home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-04-03 | 12.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 05 f4 0d 00 14 | 0f f4 20 50 72 6f 74 65 |........|.. Prote|
|00000010| 63 74 6f 72 0d 00 1e 05 | f4 0d 00 28 12 f4 20 76 |ctor....|...(.. v|
|00000020| 65 72 73 69 6f 6e 20 32 | 2e 31 30 0d 00 32 05 f4 |ersion 2|.10..2..|
|00000030| 0d 00 3c 13 f4 20 62 79 | 20 49 61 6e 20 50 61 6c |..<.. by| Ian Pal|
|00000040| 6d 65 72 0d 00 46 05 f4 | 0d 00 50 1f f4 20 63 6f |mer..F..|..P.. co|
|00000050| 70 79 72 69 67 68 74 20 | 31 39 39 32 20 49 61 6e |pyright |1992 Ian|
|00000060| 20 50 61 6c 6d 65 72 0d | 00 5a 05 f4 0d 00 64 26 | Palmer.|.Z....d&|
|00000070| f4 20 28 73 65 65 20 63 | 6f 70 79 72 69 67 68 74 |. (see c|opyright|
|00000080| 20 66 69 6c 65 20 66 6f | 72 20 64 65 74 61 69 6c | file fo|r detail|
|00000090| 73 29 0d 00 6e 05 f4 0d | 00 78 3f f4 20 54 68 69 |s)..n...|.x?. Thi|
|000000a0| 73 20 70 72 6f 67 72 61 | 6d 20 6d 75 73 74 20 62 |s progra|m must b|
|000000b0| 65 20 61 63 63 6f 6d 70 | 61 6e 69 65 64 20 62 79 |e accomp|anied by|
|000000c0| 20 74 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 66 | the fol|lowing f|
|000000d0| 69 6c 65 73 20 3a 0d 00 | 82 05 f4 0d 00 8c 3b f4 |iles :..|......;.|
|000000e0| 20 21 42 6f 6f 74 20 21 | 52 75 6e 20 21 53 70 72 | !Boot !|Run !Spr|
|000000f0| 69 74 65 73 20 43 6f 70 | 79 72 69 67 68 74 20 43 |ites Cop|yright C|
|00000100| 68 61 6e 67 65 73 20 21 | 48 65 6c 70 20 54 65 6d |hanges !|Help Tem|
|00000110| 70 6c 61 74 65 73 0d 00 | 96 05 f4 0d 00 a0 04 0d |plates..|........|
|00000120| 00 aa 4a f4 20 43 68 61 | 6e 67 65 20 62 6f 6f 74 |..J. Cha|nge boot|
|00000130| 25 20 61 6e 64 20 72 75 | 6e 25 20 74 6f 20 74 68 |% and ru|n% to th|
|00000140| 65 20 6c 65 6e 67 74 68 | 20 6f 66 20 65 61 63 68 |e length| of each|
|00000150| 20 66 69 6c 65 20 69 66 | 20 79 6f 75 20 6d 61 6b | file if| you mak|
|00000160| 65 20 63 68 61 6e 67 65 | 73 0d 00 b4 1f f4 20 74 |e change|s..... t|
|00000170| 6f 20 65 69 74 68 65 72 | 20 6f 66 20 74 68 65 73 |o either| of thes|
|00000180| 65 20 66 69 6c 65 73 2e | 0d 00 be 04 0d 00 c8 1d |e files.|........|
|00000190| 63 6f 64 65 25 3d 30 3a | 62 6f 6f 74 25 3d 35 30 |code%=0:|boot%=50|
|000001a0| 3a 72 75 6e 25 3d 31 30 | 36 0d 00 d2 04 0d 00 dc |:run%=10|6.......|
|000001b0| 4d 66 69 6e 69 73 68 65 | 64 25 3d b9 3a 6f 70 65 |Mfinishe|d%=.:ope|
|000001c0| 6e 25 3d 30 3a 6f 70 65 | 6e 32 25 3d 30 3a 6c 61 |n%=0:ope|n2%=0:la|
|000001d0| 73 74 25 3d a4 67 65 74 | 74 69 6d 65 3a 70 65 72 |st%=.get|time:per|
|000001e0| 69 6f 64 25 3d 33 30 30 | 3a 6e 75 6d 62 65 72 25 |iod%=300|:number%|
|000001f0| 3d 35 3a 74 6f 67 6f 25 | 3d 30 0d 00 e6 04 0d 00 |=5:togo%|=0......|
|00000200| f0 1b f2 77 69 6d 70 5f | 69 6e 69 74 28 22 50 72 |...wimp_|init("Pr|
|00000210| 6f 74 65 63 74 6f 72 22 | 29 0d 00 fa 04 0d 01 04 |otector"|).......|
|00000220| 0c f2 73 65 74 73 65 65 | 64 0d 01 0e 10 ee 20 85 |..setsee|d..... .|
|00000230| 20 f2 65 72 72 6f 72 3a | e0 0d 01 18 13 f2 63 68 | .error:|......ch|
|00000240| 65 63 6b 5f 79 6f 75 72 | 73 65 6c 66 0d 01 22 0b |eck_your|self..".|
|00000250| f2 62 61 6e 6e 65 72 0d | 01 2c 05 f5 0d 01 36 0b |.banner.|.,....6.|
|00000260| 20 20 f2 70 6f 6c 6c 0d | 01 40 2d fd 20 71 75 69 | .poll.|.@-. qui|
|00000270| 74 25 20 80 20 66 69 6e | 69 73 68 65 64 25 20 80 |t% . fin|ished% .|
|00000280| 20 62 61 6e 6e 65 72 25 | 3d a3 20 80 20 6c 6f 63 | banner%|=. . loc|
|00000290| 6b 25 3d a3 0d 01 4a 17 | c8 99 20 22 57 69 6d 70 |k%=...J.|.. "Wimp|
|000002a0| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 0d 01 54 13 e7 |_CloseDo|wn"..T..|
|000002b0| 20 63 68 61 6e 25 20 d9 | 23 63 68 61 6e 25 0d 01 | chan% .|#chan%..|
|000002c0| 5e 05 e0 0d 01 68 04 0d | 01 72 0a dd f2 70 6f 6c |^....h..|.r...pol|
|000002d0| 6c 0d 01 7c 21 21 62 6c | 6f 63 6b 25 3d 25 31 30 |l..|!!bl|ock%=%10|
|000002e0| 30 31 31 31 31 31 31 31 | 30 31 31 30 31 31 30 30 |01111111|01101100|
|000002f0| 31 31 0d 01 86 2b c8 99 | 20 22 57 69 6d 70 5f 50 |11...+..| "Wimp_P|
|00000300| 6f 6c 6c 22 2c 30 2c 62 | 6c 6f 63 6b 25 20 b8 20 |oll",0,b|lock% . |
|00000310| 72 65 61 73 6f 6e 25 2c | 69 6e 66 6f 25 0d 01 90 |reason%,|info%...|
|00000320| 10 c8 8e 20 72 65 61 73 | 6f 6e 25 20 ca 0d 01 9a |... reas|on% ....|
|00000330| 2b 20 20 20 20 c9 20 30 | 20 3a 20 f2 63 68 65 63 |+ . 0| : .chec|
|00000340| 6b 5f 66 69 6c 65 73 3a | e7 20 6c 6f 63 6b 25 20 |k_files:|. lock% |
|00000350| f2 67 65 74 70 61 73 73 | 0d 01 a4 29 20 20 20 20 |.getpass|...) |
|00000360| c9 20 32 20 3a 20 c8 99 | 20 22 57 69 6d 70 5f 4f |. 2 : ..| "Wimp_O|
|00000370| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 69 6e 66 6f |penWindo|w",,info|
|00000380| 25 0d 01 ae 42 20 20 20 | 20 c9 20 33 20 3a 20 c8 |%...B | . 3 : .|
|00000390| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |. "Wimp_|CloseWin|
|000003a0| 64 6f 77 22 2c 2c 69 6e | 66 6f 25 3a e7 20 21 69 |dow",,in|fo%:. !i|
|000003b0| 6e 66 6f 25 3d 68 77 6f | 72 6b 25 20 77 77 69 6e |nfo%=hwo|rk% wwin|
|000003c0| 25 3d a3 0d 01 b8 a9 20 | 20 20 20 c9 20 36 20 3a |%=..... | . 6 :|
|000003d0| 20 e7 20 69 6e 66 6f 25 | 21 38 3d 32 20 80 20 ac | . info%|!8=2 . .|
|000003e0| 28 6c 6f 63 6b 25 29 20 | 6d 65 6e 75 24 28 37 29 |(lock%) |menu$(7)|
|000003f0| 3d 22 43 68 65 63 6b 20 | 22 2b c3 28 72 61 6e 64 |="Check |"+.(rand|
|00000400| 25 29 2b 22 25 22 3a 6d | 65 6e 75 25 3d a4 63 72 |%)+"%":m|enu%=.cr|
|00000410| 65 61 74 65 5f 6d 65 6e | 75 28 6d 79 5f 6e 61 6d |eate_men|u(my_nam|
|00000420| 65 24 2c 37 2c 32 2c 37 | 2c 30 2c 6d 65 6e 75 24 |e$,7,2,7|,0,menu$|
|00000430| 28 29 2c 6d 65 6e 75 25 | 29 3a c8 99 20 22 57 69 |(),menu%|):.. "Wi|
|00000440| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00000450| 6d 65 6e 75 25 2c 21 62 | 6c 6f 63 6b 25 2d 6d 65 |menu%,!b|lock%-me|
|00000460| 6e 75 25 21 31 36 2f 32 | 2c 34 39 32 0d 01 c2 67 |nu%!16/2|,492...g|
|00000470| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 69 | | . i|
|00000480| 6e 66 6f 25 21 31 36 3d | 35 20 80 20 62 61 6e 6e |nfo%!16=|5 . bann|
|00000490| 65 72 25 20 62 61 6e 6e | 65 72 25 3d a3 3a 21 77 |er% bann|er%=.:!w|
|000004a0| 77 6f 72 6b 25 3d 68 77 | 6f 72 6b 25 3a c8 99 20 |work%=hw|ork%:.. |
|000004b0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|000004c0| 77 22 2c 2c 77 77 6f 72 | 6b 25 3a 77 6f 70 65 6e |w",,wwor|k%:wopen|
|000004d0| 25 3d 30 0d 01 cc 25 20 | 20 20 20 c9 20 39 20 3a |%=0...% | . 9 :|
|000004e0| 20 f2 6d 65 6e 75 28 21 | 62 6c 6f 63 6b 25 2c 62 | .menu(!|block%,b|
|000004f0| 6c 6f 63 6b 25 21 34 29 | 0d 01 d6 68 20 20 20 20 |lock%!4)|...h |
|00000500| c9 20 31 37 2c 31 38 20 | 3a 20 e7 20 62 6c 6f 63 |. 17,18 |: . bloc|
|00000510| 6b 25 21 31 36 3d 30 20 | 80 20 ac 28 6c 6f 63 6b |k%!16=0 |. .(lock|
|00000520| 25 29 20 71 75 69 74 25 | 3d b9 3a 66 69 6e 69 73 |%) quit%|=.:finis|
|00000530| 68 65 64 25 3d b9 3a 8b | 20 e7 20 62 6c 6f 63 6b |hed%=.:.| . block|
|00000540| 25 21 31 36 3d 33 20 f2 | 73 63 61 6e 28 a4 73 74 |%!16=3 .|scan(.st|
|00000550| 72 69 6e 67 28 62 6c 6f | 63 6b 25 2b 34 34 29 29 |ring(blo|ck%+44))|
|00000560| 0d 01 e0 05 cb 0d 01 ea | 05 e1 0d 01 f4 04 0d 01 |........|........|
|00000570| fe 14 dd f2 63 68 65 63 | 6b 5f 79 6f 75 72 73 65 |....chec|k_yourse|
|00000580| 6c 66 0d 02 08 0e ea 20 | 43 25 2c 45 25 2c 46 24 |lf..... |C%,E%,F$|
|00000590| 0d 02 12 2c 46 24 3d 6d | 79 5f 76 61 72 24 2b 22 |...,F$=m|y_var$+"|
|000005a0| 2e 21 42 6f 6f 74 22 3a | 43 25 3d 8e 20 46 24 3a |.!Boot":|C%=. F$:|
|000005b0| 45 25 3d a2 23 43 25 3a | d9 23 43 25 0d 02 1c 51 |E%=.#C%:|.#C%...Q|
|000005c0| e7 20 45 25 3c 3e 62 6f | 6f 74 25 20 f2 77 69 6d |. E%<>bo|ot% .wim|
|000005d0| 70 5f 65 72 72 6f 72 28 | 30 2c 22 57 41 52 4e 49 |p_error(|0,"WARNI|
|000005e0| 4e 47 21 20 4d 79 20 21 | 42 6f 6f 74 20 66 69 6c |NG! My !|Boot fil|
|000005f0| 65 20 68 61 73 20 62 65 | 65 6e 20 61 6c 74 65 72 |e has be|en alter|
|00000600| 65 64 22 2c 6d 79 5f 6e | 61 6d 65 24 29 0d 02 26 |ed",my_n|ame$)..&|
|00000610| 2b 46 24 3d 6d 79 5f 76 | 61 72 24 2b 22 2e 21 52 |+F$=my_v|ar$+".!R|
|00000620| 75 6e 22 3a 43 25 3d 8e | 20 46 24 3a 45 25 3d a2 |un":C%=.| F$:E%=.|
|00000630| 23 43 25 3a d9 23 43 25 | 0d 02 30 4f e7 20 45 25 |#C%:.#C%|..0O. E%|
|00000640| 3c 3e 72 75 6e 25 20 f2 | 77 69 6d 70 5f 65 72 72 |<>run% .|wimp_err|
|00000650| 6f 72 28 30 2c 22 57 41 | 52 4e 49 4e 47 21 20 4d |or(0,"WA|RNING! M|
|00000660| 79 20 21 52 75 6e 20 66 | 69 6c 65 20 68 61 73 20 |y !Run f|ile has |
|00000670| 62 65 65 6e 20 61 6c 74 | 65 72 65 64 22 2c 6d 79 |been alt|ered",my|
|00000680| 5f 6e 61 6d 65 24 29 0d | 02 3a 64 e7 20 63 6f 64 |_name$).|.:d. cod|
|00000690| 65 25 3c 3e 30 20 80 20 | 63 6f 64 65 25 3c 3e 28 |e%<>0 . |code%<>(|
|000006a0| b8 50 2d 90 29 20 f2 77 | 69 6d 70 5f 65 72 72 6f |.P-.) .w|imp_erro|
|000006b0| 72 28 30 2c 22 57 41 52 | 4e 49 4e 47 21 20 4d 79 |r(0,"WAR|NING! My|
|000006c0| 20 21 52 75 6e 49 6d 61 | 67 65 20 66 69 6c 65 20 | !RunIma|ge file |
|000006d0| 68 61 73 20 62 65 65 6e | 20 61 6c 74 65 72 65 64 |has been| altered|
|000006e0| 22 2c 6d 79 5f 6e 61 6d | 65 24 29 0d 02 44 05 e1 |",my_nam|e$)..D..|
|000006f0| 0d 02 4e 04 0d 02 58 1a | dd f2 77 69 6d 70 5f 65 |..N...X.|..wimp_e|
|00000700| 72 72 6f 72 28 45 25 2c | 45 24 2c 4e 24 29 0d 02 |rror(E%,|E$,N$)..|
|00000710| 62 34 21 5f 65 72 72 6f | 72 25 3d 45 25 3a 24 28 |b4!_erro|r%=E%:$(|
|00000720| 5f 65 72 72 6f 72 25 2b | 34 29 3d 45 24 3a 3f 28 |_error%+|4)=E$:?(|
|00000730| 5f 65 72 72 6f 72 25 2b | 34 2b a9 28 45 24 29 29 |_error%+|4+.(E$))|
|00000740| 3d 30 0d 02 6c 26 c8 99 | 20 22 57 69 6d 70 5f 52 |=0..l&..| "Wimp_R|
|00000750| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 5f 65 72 72 |eportErr|or",_err|
|00000760| 6f 72 25 2c 31 2c 4e 24 | 0d 02 76 05 e1 0d 02 80 |or%,1,N$|..v.....|
|00000770| 04 0d 02 8a 0d dd f2 73 | 65 74 73 65 65 64 0d 02 |.......s|etseed..|
|00000780| 94 48 ea 20 53 24 2c 53 | 25 3a 53 24 3d c1 91 24 |.H. S$,S|%:S$=..$|
|00000790| 2c 35 2c 32 29 2b c1 91 | 24 2c 31 37 2c 32 29 2b |,5,2)+..|$,17,2)+|
|000007a0| c1 91 24 2c 32 30 2c 32 | 29 2b c1 91 24 2c 32 33 |..$,20,2|)+..$,23|
|000007b0| 2c 32 29 3a 53 25 3d bb | 28 53 24 29 3a 53 25 3d |,2):S%=.|(S$):S%=|
|000007c0| b3 28 2d 53 25 29 0d 02 | 9e 05 e1 0d 02 a8 04 0d |.(-S%)..|........|
|000007d0| 02 b2 0d dd a4 67 65 74 | 74 69 6d 65 0d 02 bc 33 |.....get|time...3|
|000007e0| 3d bb 28 c1 91 24 2c 32 | 33 2c 32 29 29 2b 36 30 |=.(..$,2|3,2))+60|
|000007f0| 2a 28 bb 28 c1 91 24 2c | 32 30 2c 32 29 29 2b 36 |*(.(..$,|20,2))+6|
|00000800| 30 2a bb 28 c1 91 24 2c | 31 37 2c 32 29 29 29 0d |0*.(..$,|17,2))).|
|00000810| 02 c6 04 0d 02 d0 16 dd | f2 77 69 6d 70 5f 69 6e |........|.wimp_in|
|00000820| 69 74 28 6e 61 6d 65 24 | 29 0d 02 da 0e ea 20 56 |it(name$|)..... V|
|00000830| 25 2c 4c 25 2c 54 25 0d | 02 e4 2c 6d 79 5f 6e 61 |%,L%,T%.|..,my_na|
|00000840| 6d 65 24 3d 6e 61 6d 65 | 24 3a 6d 79 5f 76 61 72 |me$=name|$:my_var|
|00000850| 24 3d 22 3c 22 2b 6e 61 | 6d 65 24 2b 22 24 44 69 |$="<"+na|me$+"$Di|
|00000860| 72 3e 22 0d 02 ee 40 de | 20 6d 65 6e 75 24 28 38 |r>"...@.| menu$(8|
|00000870| 29 2c 73 6d 65 6e 75 24 | 28 30 29 2c 70 6d 65 6e |),smenu$|(0),pmen|
|00000880| 75 24 28 30 29 2c 63 6d | 65 6e 75 24 28 30 29 2c |u$(0),cm|enu$(0),|
|00000890| 6e 6d 65 6e 75 24 28 30 | 29 2c 74 6d 65 6e 75 24 |nmenu$(0|),tmenu$|
|000008a0| 28 30 29 0d 02 f8 d2 6d | 65 6e 75 24 28 30 29 3d |(0)....m|enu$(0)=|
|000008b0| 22 49 6e 66 6f 3c 69 6e | 66 6f 5f 77 69 6e 25 3e |"Info<in|fo_win%>|
|000008c0| 22 3a 6d 65 6e 75 24 28 | 31 29 3d 22 53 63 61 6e |":menu$(|1)="Scan|
|000008d0| 3c 73 6d 65 6e 75 25 3e | 22 3a 6d 65 6e 75 24 28 |<smenu%>|":menu$(|
|000008e0| 32 29 3d 22 50 61 73 73 | 77 6f 72 64 3c 70 6d 65 |2)="Pass|word<pme|
|000008f0| 6e 75 25 3e 22 3a 6d 65 | 6e 75 24 28 33 29 3d 22 |nu%>":me|nu$(3)="|
|00000900| 25 20 63 68 65 63 6b 3c | 63 6d 65 6e 75 25 3e 22 |% check<|cmenu%>"|
|00000910| 3a 6d 65 6e 75 24 28 34 | 29 3d 22 50 65 72 69 6f |:menu$(4|)="Perio|
|00000920| 64 3c 74 6d 65 6e 75 25 | 3e 22 3a 6d 65 6e 75 24 |d<tmenu%|>":menu$|
|00000930| 28 35 29 3d 22 4e 75 6d | 62 65 72 3c 6e 6d 65 6e |(5)="Num|ber<nmen|
|00000940| 75 25 3e 22 3a 6d 65 6e | 75 24 28 36 29 3d 22 4c |u%>":men|u$(6)="L|
|00000950| 6f 63 6b 22 3a 6d 65 6e | 75 24 28 37 29 3d 22 43 |ock":men|u$(7)="C|
|00000960| 68 65 63 6b 22 3a 6d 65 | 6e 75 24 28 38 29 3d 22 |heck":me|nu$(8)="|
|00000970| 51 75 69 74 22 0d 03 02 | 30 73 6d 65 6e 75 24 28 |Quit"...|0smenu$(|
|00000980| 30 29 3d 22 3e 69 6e 5f | 62 75 66 25 3c 22 3a 70 |0)=">in_|buf%<":p|
|00000990| 6d 65 6e 75 24 28 30 29 | 3d 22 3e 69 6e 5f 62 75 |menu$(0)|=">in_bu|
|000009a0| 66 32 25 3c 22 0d 03 0c | 41 54 25 3d a4 6d 61 6c |f2%<"...|AT%=.mal|
|000009b0| 6c 6f 63 28 35 29 3a 5f | 65 72 72 6f 72 25 3d a4 |loc(5):_|error%=.|
|000009c0| 6d 61 6c 6c 6f 63 28 31 | 30 30 29 3a 4c 25 3d a4 |malloc(1|00):L%=.|
|000009d0| 6d 61 6c 6c 6f 63 28 32 | 35 36 29 3a 69 6e 5f 62 |malloc(2|56):in_b|
|000009e0| 75 66 25 3d 4c 25 0d 03 | 16 45 69 6e 5f 62 75 66 |uf%=L%..|.Ein_buf|
|000009f0| 32 25 3d a4 6d 61 6c 6c | 6f 63 28 32 35 36 29 3a |2%=.mall|oc(256):|
|00000a00| 69 6e 5f 62 75 66 33 25 | 3d a4 6d 61 6c 6c 6f 63 |in_buf3%|=.malloc|
|00000a10| 28 32 35 36 29 3a 69 6e | 5f 62 75 66 34 25 3d a4 |(256):in|_buf4%=.|
|00000a20| 6d 61 6c 6c 6f 63 28 32 | 35 36 29 0d 03 20 34 24 |malloc(2|56).. 4$|
|00000a30| 69 6e 5f 62 75 66 33 25 | 3d 22 31 30 30 22 3a 24 |in_buf3%|="100":$|
|00000a40| 54 25 3d 22 54 41 53 4b | 22 3a 69 6e 5f 62 75 66 |T%="TASK|":in_buf|
|00000a50| 35 25 3d a4 6d 61 6c 6c | 6f 63 28 32 35 36 29 0d |5%=.mall|oc(256).|
|00000a60| 03 2a 4c c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |.*L.. "W|imp_Init|
|00000a70| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 54 25 2c |ialise",|200,!T%,|
|00000a80| 6e 61 6d 65 24 20 b8 20 | 56 25 3a 46 24 3d 6d 79 |name$ . |V%:F$=my|
|00000a90| 5f 76 61 72 24 2b 22 2e | 21 53 70 72 69 74 65 73 |_var$+".|!Sprites|
|00000aa0| 22 2b a4 6d 6f 64 65 5f | 65 6e 64 0d 03 34 31 43 |"+.mode_|end..41C|
|00000ab0| 25 3d 8e 20 46 24 3a e7 | 20 43 25 3d 30 20 46 24 |%=. F$:.| C%=0 F$|
|00000ac0| 3d 6d 79 5f 76 61 72 24 | 2b 22 2e 21 53 70 72 69 |=my_var$|+".!Spri|
|00000ad0| 74 65 73 22 3a 43 25 3d | 8e 20 46 24 0d 03 3e 13 |tes":C%=|. F$..>.|
|00000ae0| 4c 25 3d 31 36 2b a2 23 | 43 25 3a d9 23 43 25 0d |L%=16+.#|C%:.#C%.|
|00000af0| 03 48 4a 73 70 72 69 74 | 65 25 3d a4 6d 61 6c 6c |.HJsprit|e%=.mall|
|00000b00| 6f 63 28 4c 25 29 3a 21 | 73 70 72 69 74 65 25 3d |oc(L%):!|sprite%=|
|00000b10| 4c 25 3a 73 70 72 69 74 | 65 25 21 34 3d 30 3a 73 |L%:sprit|e%!4=0:s|
|00000b20| 70 72 69 74 65 25 21 38 | 3d 31 36 3a 73 70 72 69 |prite%!8|=16:spri|
|00000b30| 74 65 25 21 31 32 3d 31 | 36 0d 03 52 26 c8 99 20 |te%!12=1|6..R&.. |
|00000b40| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 32 35 |"OS_Spri|teOp",25|
|00000b50| 36 2b 31 30 2c 73 70 72 | 69 74 65 25 2c 46 24 0d |6+10,spr|ite%,F$.|
|00000b60| 03 5c 41 69 5f 74 65 6d | 70 25 3d a4 6d 61 6c 6c |.\Ai_tem|p%=.mall|
|00000b70| 6f 63 28 35 31 32 29 3a | 77 77 6f 72 6b 25 3d a4 |oc(512):|wwork%=.|
|00000b80| 6d 61 6c 6c 6f 63 28 35 | 31 32 29 3a 69 63 62 75 |malloc(5|12):icbu|
|00000b90| 66 25 3d a4 6d 61 6c 6c | 6f 63 28 31 30 32 34 29 |f%=.mall|oc(1024)|
|00000ba0| 0d 03 66 99 21 69 5f 74 | 65 6d 70 25 3d 2d 31 3a |..f.!i_t|emp%=-1:|
|00000bb0| 69 5f 74 65 6d 70 25 21 | 34 3d 30 3a 69 5f 74 65 |i_temp%!|4=0:i_te|
|00000bc0| 6d 70 25 21 38 3d 30 3a | 69 5f 74 65 6d 70 25 21 |mp%!8=0:|i_temp%!|
|00000bd0| 31 32 3d 36 38 3a 69 5f | 74 65 6d 70 25 21 31 36 |12=68:i_|temp%!16|
|00000be0| 3d 36 38 3a 69 5f 74 65 | 6d 70 25 21 32 30 3d 26 |=68:i_te|mp%!20=&|
|00000bf0| 32 31 30 32 3a 69 5f 74 | 65 6d 70 25 21 32 34 3d |2102:i_t|emp%!24=|
|00000c00| a4 6d 61 6c 6c 6f 63 28 | 31 32 29 3a 24 28 69 5f |.malloc(|12):$(i_|
|00000c10| 74 65 6d 70 25 21 32 34 | 29 3d 22 21 22 2b 6d 79 |temp%!24|)="!"+my|
|00000c20| 5f 6e 61 6d 65 24 3a 69 | 5f 74 65 6d 70 25 21 32 |_name$:i|_temp%!2|
|00000c30| 38 3d 73 70 72 69 74 65 | 25 0d 03 70 36 69 5f 74 |8=sprite|%..p6i_t|
|00000c40| 65 6d 70 25 21 33 32 3d | 36 3a c8 99 20 22 57 69 |emp%!32=|6:.. "Wi|
|00000c50| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00000c60| 69 5f 74 65 6d 70 25 20 | b8 20 69 63 6f 6e 25 0d |i_temp% |. icon%.|
|00000c70| 03 7a 30 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.z0.. "W|imp_Open|
|00000c80| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 6d 79 5f 76 61 |Template|",,my_va|
|00000c90| 72 24 2b 22 2e 54 65 6d | 70 6c 61 74 65 73 22 0d |r$+".Tem|plates".|
|00000ca0| 03 84 2a 69 63 62 75 66 | 6e 25 3d 69 63 62 75 66 |..*icbuf|n%=icbuf|
|00000cb0| 25 3a 62 6c 6f 63 6b 25 | 3d 77 77 6f 72 6b 25 3a |%:block%|=wwork%:|
|00000cc0| 72 61 6e 64 25 3d 31 30 | 30 0d 03 8e 4e c8 99 20 |rand%=10|0...N.. |
|00000cd0| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00000ce0| 74 65 22 2c 2c 77 77 6f | 72 6b 25 2c 69 63 62 75 |te",,wwo|rk%,icbu|
|00000cf0| 66 6e 25 2c 69 63 62 75 | 66 25 2b 31 30 32 34 2c |fn%,icbu|f%+1024,|
|00000d00| 2d 31 2c 22 49 6e 66 6f | 22 2c 30 20 b8 20 2c 2c |-1,"Info|",0 . ,,|
|00000d10| 69 63 62 75 66 6e 25 0d | 03 98 2e c8 99 20 22 57 |icbufn%.|..... "W|
|00000d20| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000d30| 22 2c 2c 77 77 6f 72 6b | 25 20 b8 20 69 6e 66 6f |",,wwork|% . info|
|00000d40| 5f 77 69 6e 25 0d 03 a2 | 50 c8 99 20 22 57 69 6d |_win%...|P.. "Wim|
|00000d50| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000d60| 2c 77 77 6f 72 6b 25 2c | 69 63 62 75 66 6e 25 2c |,wwork%,|icbufn%,|
|00000d70| 69 63 62 75 66 25 2b 31 | 30 32 34 2c 2d 31 2c 22 |icbuf%+1|024,-1,"|
|00000d80| 42 61 6e 6e 65 72 22 2c | 30 20 b8 20 2c 2c 69 63 |Banner",|0 . ,,ic|
|00000d90| 62 75 66 6e 25 0d 03 ac | 2a c8 99 20 22 57 69 6d |bufn%...|*.. "Wim|
|00000da0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00000db0| 2c 77 77 6f 72 6b 25 20 | b8 20 70 68 61 6e 25 0d |,wwork% |. phan%.|
|00000dc0| 03 b6 50 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..P.. "W|imp_Load|
|00000dd0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 77 77 6f 72 6b |Template|",,wwork|
|00000de0| 25 2c 69 63 62 75 66 6e | 25 2c 69 63 62 75 66 25 |%,icbufn|%,icbuf%|
|00000df0| 2b 31 30 32 34 2c 2d 31 | 2c 22 4e 6f 50 61 73 73 |+1024,-1|,"NoPass|
|00000e00| 22 2c 30 20 b8 20 2c 2c | 69 63 62 75 66 6e 25 0d |",0 . ,,|icbufn%.|
|00000e10| 03 c0 2a c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..*.. "W|imp_Crea|
|00000e20| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 77 77 6f 72 6b |teWindow|",,wwork|
|00000e30| 25 20 b8 20 62 68 61 6e | 25 0d 03 ca 1b c8 99 20 |% . bhan|%...... |
|00000e40| 22 57 69 6d 70 5f 43 6c | 6f 73 65 54 65 6d 70 6c |"Wimp_Cl|oseTempl|
|00000e50| 61 74 65 22 0d 03 d4 3f | 6c 6f 63 6b 25 3d a3 3a |ate"...?|lock%=.:|
|00000e60| 62 61 6e 6e 65 72 25 3d | a3 3a 73 63 61 6e 25 3d |banner%=|.:scan%=|
|00000e70| a3 3a 77 6f 70 65 6e 25 | 3d 30 3a 63 68 61 6e 25 |.:wopen%|=0:chan%|
|00000e80| 3d 30 3a 77 6f 70 65 6e | 25 3d 30 3a 71 75 69 74 |=0:wopen|%=0:quit|
|00000e90| 25 3d a3 0d 03 de 18 c8 | 99 20 22 58 4f 53 5f 47 |%=......|. "XOS_G|
|00000ea0| 65 74 45 6e 76 22 20 b8 | 20 45 24 0d 03 e8 22 e3 |etEnv" .| E$...".|
|00000eb0| 20 52 25 3d 31 20 b8 20 | 32 3a 45 24 3d c1 45 24 | R%=1 . |2:E$=.E$|
|00000ec0| 2c a7 45 24 2c 22 22 22 | 22 29 29 3a ed 0d 03 f2 |,.E$,"""|")):....|
|00000ed0| 12 c8 95 20 a7 45 24 2c | 22 2d 22 29 3c 3e 30 0d |... .E$,|"-")<>0.|
|00000ee0| 03 fc 2c 20 20 45 24 3d | c1 45 24 2c a7 45 24 2c |.., E$=|.E$,.E$,|
|00000ef0| 22 2d 22 29 2b 31 29 3a | 4f 24 3d c0 45 24 2c 31 |"-")+1):|O$=.E$,1|
|00000f00| 29 3a 45 24 3d c1 45 24 | 2c 32 29 0d 04 06 0d 20 |):E$=.E$|,2).... |
|00000f10| 20 c8 8e 20 4f 24 20 ca | 0d 04 10 26 20 20 20 20 | .. O$ .|...& |
|00000f20| c9 20 22 4c 22 2c 22 6c | 22 20 3a 20 6c 6f 63 6b |. "L","l|" : lock|
|00000f30| 25 3d b9 3a f2 72 65 61 | 64 5f 70 61 73 73 0d 04 |%=.:.rea|d_pass..|
|00000f40| 1a 1d 20 20 20 20 c9 20 | 22 42 22 2c 22 62 22 20 |.. . |"B","b" |
|00000f50| 3a 20 62 61 6e 6e 65 72 | 25 3d b9 0d 04 24 1f 20 |: banner|%=...$. |
|00000f60| 20 20 20 c9 20 22 53 22 | 2c 22 73 22 20 3a 20 f2 | . "S"|,"s" : .|
|00000f70| 73 74 61 72 74 5f 73 63 | 61 6e 0d 04 2e 1b 20 20 |start_sc|an.... |
|00000f80| 20 20 c9 20 22 51 22 2c | 22 71 22 20 3a 20 71 75 | . "Q",|"q" : qu|
|00000f90| 69 74 25 3d b9 0d 04 38 | 20 20 20 20 20 c9 20 22 |it%=...8| . "|
|00000fa0| 50 22 2c 22 70 22 20 3a | 20 f2 67 69 76 65 5f 75 |P","p" :| .give_u|
|00000fb0| 70 28 45 24 29 0d 04 42 | 32 20 20 20 20 c9 20 22 |p(E$)..B|2 . "|
|00000fc0| 52 22 2c 22 72 22 20 3a | 20 72 61 6e 64 25 3d bb |R","r" :| rand%=.|
|00000fd0| 28 45 24 29 3a 24 69 6e | 5f 62 75 66 33 25 3d c3 |(E$):$in|_buf3%=.|
|00000fe0| 28 72 61 6e 64 25 29 0d | 04 4c 21 20 20 20 20 c9 |(rand%).|.L! .|
|00000ff0| 20 22 54 22 2c 22 74 22 | 20 3a 20 70 65 72 69 6f | "T","t"| : perio|
|00001000| 64 25 3d bb 28 45 24 29 | 0d 04 56 21 20 20 20 20 |d%=.(E$)|..V! |
|00001010| c9 20 22 4e 22 2c 22 6e | 22 20 3a 20 6e 75 6d 62 |. "N","n|" : numb|
|00001020| 65 72 25 3d bb 28 45 24 | 29 0d 04 60 07 20 20 cb |er%=.(E$|)..`. .|
|00001030| 0d 04 6a 05 ce 0d 04 74 | 36 70 6d 65 6e 75 25 3d |..j....t|6pmenu%=|
|00001040| a4 63 72 65 61 74 65 5f | 6d 65 6e 75 28 22 50 61 |.create_|menu("Pa|
|00001050| 73 73 77 6f 72 64 22 2c | 37 2c 32 2c 37 2c 30 2c |ssword",|7,2,7,0,|
|00001060| 70 6d 65 6e 75 24 28 29 | 2c 30 29 0d 04 7e 67 63 |pmenu$()|,0)..~gc|
|00001070| 6d 65 6e 75 24 28 30 29 | 3d c3 28 72 61 6e 64 25 |menu$(0)|=.(rand%|
|00001080| 29 2b 22 3e 69 6e 5f 62 | 75 66 33 25 3c 22 3a 74 |)+">in_b|uf3%<":t|
|00001090| 6d 65 6e 75 24 28 30 29 | 3d c3 28 70 65 72 69 6f |menu$(0)|=.(perio|
|000010a0| 64 25 29 2b 22 3e 69 6e | 5f 62 75 66 34 25 3c 22 |d%)+">in|_buf4%<"|
|000010b0| 3a 6e 6d 65 6e 75 24 28 | 30 29 3d c3 28 6e 75 6d |:nmenu$(|0)=.(num|
|000010c0| 62 65 72 25 29 2b 22 3e | 69 6e 5f 62 75 66 35 25 |ber%)+">|in_buf5%|
|000010d0| 3c 22 0d 04 88 35 63 6d | 65 6e 75 25 3d a4 63 72 |<"...5cm|enu%=.cr|
|000010e0| 65 61 74 65 5f 6d 65 6e | 75 28 22 25 20 63 68 65 |eate_men|u("% che|
|000010f0| 63 6b 22 2c 37 2c 32 2c | 37 2c 30 2c 63 6d 65 6e |ck",7,2,|7,0,cmen|
|00001100| 75 24 28 29 2c 30 29 0d | 04 92 34 74 6d 65 6e 75 |u$(),0).|..4tmenu|
|00001110| 25 3d a4 63 72 65 61 74 | 65 5f 6d 65 6e 75 28 22 |%=.creat|e_menu("|
|00001120| 50 65 72 69 6f 64 22 2c | 37 2c 32 2c 37 2c 30 2c |Period",|7,2,7,0,|
|00001130| 74 6d 65 6e 75 24 28 29 | 2c 30 29 0d 04 9c 34 6e |tmenu$()|,0)...4n|
|00001140| 6d 65 6e 75 25 3d a4 63 | 72 65 61 74 65 5f 6d 65 |menu%=.c|reate_me|
|00001150| 6e 75 28 22 4e 75 6d 62 | 65 72 22 2c 37 2c 32 2c |nu("Numb|er",7,2,|
|00001160| 37 2c 30 2c 6e 6d 65 6e | 75 24 28 29 2c 30 29 0d |7,0,nmen|u$(),0).|
|00001170| 04 a6 3a 73 6d 65 6e 75 | 25 3d a4 63 72 65 61 74 |..:smenu|%=.creat|
|00001180| 65 5f 6d 65 6e 75 28 22 | 53 63 61 6e 22 2c 37 2c |e_menu("|Scan",7,|
|00001190| 32 2c 37 2c 30 2c 73 6d | 65 6e 75 24 28 29 2c 30 |2,7,0,sm|enu$(),0|
|000011a0| 29 3a 6d 65 6e 75 25 3d | 30 0d 04 b0 31 e7 20 6c |):menu%=|0...1. l|
|000011b0| 6f 63 6b 25 20 62 61 6e | 6e 65 72 25 3d a3 3a 68 |ock% ban|ner%=.:h|
|000011c0| 77 6f 72 6b 25 3d 70 68 | 61 6e 25 3a 8b 20 68 77 |work%=ph|an%:. hw|
|000011d0| 6f 72 6b 25 3d 62 68 61 | 6e 25 0d 04 ba 05 e1 0d |ork%=bha|n%......|
|000011e0| 04 c4 04 0d 04 ce 0c dd | f2 62 61 6e 6e 65 72 0d |........|.banner.|
|000011f0| 04 d8 14 ea 20 49 25 2c | 41 25 2c 4e 25 2c 4c 24 |.... I%,|A%,N%,L$|
|00001200| 2c 46 24 0d 04 e2 1b e7 | 20 6c 6f 63 6b 25 3d a3 |,F$.....| lock%=.|
|00001210| 20 80 20 62 61 6e 6e 65 | 72 25 3d a3 20 e1 0d 04 | . banne|r%=. ...|
|00001220| ec 42 e7 20 77 6f 70 65 | 6e 25 20 21 77 77 6f 72 |.B. wope|n% !wwor|
|00001230| 6b 25 3d 77 6f 70 65 6e | 25 3a c8 99 20 22 57 69 |k%=wopen|%:.. "Wi|
|00001240| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00001250| 2c 77 77 6f 72 6b 25 3a | 77 6f 70 65 6e 25 3d 30 |,wwork%:|wopen%=0|
|00001260| 0d 04 f6 29 46 24 3d 6d | 79 5f 76 61 72 24 2b 22 |...)F$=m|y_var$+"|
|00001270| 2e 42 61 6e 6e 65 72 22 | 3a 4e 25 3d 8e 20 46 24 |.Banner"|:N%=. F$|
|00001280| 3a 6f 70 65 6e 25 3d 4e | 25 0d 05 00 47 e7 20 4e |:open%=N|%...G. N|
|00001290| 25 3d 30 20 f2 77 69 6d | 70 5f 65 72 72 6f 72 28 |%=0 .wim|p_error(|
|000012a0| 30 2c 22 4e 6f 20 62 61 | 6e 6e 65 72 20 66 69 6c |0,"No ba|nner fil|
|000012b0| 65 22 2c 6d 79 5f 6e 61 | 6d 65 24 29 3a 6c 6f 63 |e",my_na|me$):loc|
|000012c0| 6b 25 3d 30 3a 62 61 6e | 6e 65 72 25 3d 30 3a e1 |k%=0:ban|ner%=0:.|
|000012d0| 0d 05 0a 33 21 77 77 6f | 72 6b 25 3d 68 77 6f 72 |...3!wwo|rk%=hwor|
|000012e0| 6b 25 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |k%:.. "W|imp_GetW|
|000012f0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 77 77 6f |indowSta|te",,wwo|
|00001300| 72 6b 25 0d 05 14 2e c8 | 99 20 22 57 69 6d 70 5f |rk%.....|. "Wimp_|
|00001310| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 77 77 6f |OpenWind|ow",,wwo|
|00001320| 72 6b 25 3a 77 6f 70 65 | 6e 25 3d 68 77 6f 72 6b |rk%:wope|n%=hwork|
|00001330| 25 0d 05 1e 2c e3 20 41 | 25 3d 30 20 b8 20 34 3a |%...,. A|%=0 . 4:|
|00001340| 4c 24 3d c0 be 23 4e 25 | 2c 34 30 29 3a f2 70 75 |L$=..#N%|,40):.pu|
|00001350| 74 5f 69 63 6f 6e 28 41 | 25 2c 4c 24 29 0d 05 28 |t_icon(A|%,L$)..(|
|00001360| 0f e7 20 c5 23 4e 25 20 | 41 25 3d 34 0d 05 32 12 |.. .#N% |A%=4..2.|
|00001370| ed 3a d9 23 4e 25 3a 6f | 70 65 6e 25 3d 30 0d 05 |.:.#N%:o|pen%=0..|
|00001380| 3c 05 e1 0d 05 46 04 0d | 05 50 10 dd f2 73 74 61 |<....F..|.P...sta|
|00001390| 72 74 5f 73 63 61 6e 0d | 05 5a 08 ea 20 46 24 0d |rt_scan.|.Z.. F$.|
|000013a0| 05 64 50 e7 20 73 63 61 | 6e 25 20 f2 77 69 6d 70 |.dP. sca|n% .wimp|
|000013b0| 5f 65 72 72 6f 72 28 30 | 2c 22 49 20 63 61 6e 27 |_error(0|,"I can'|
|000013c0| 74 20 53 43 41 4e 20 26 | 20 43 48 45 43 4b 20 61 |t SCAN &| CHECK a|
|000013d0| 74 20 74 68 65 20 73 61 | 6d 65 20 74 69 6d 65 2e |t the sa|me time.|
|000013e0| 2e 2e 22 2c 6d 79 5f 6e | 61 6d 65 24 29 3a e1 0d |..",my_n|ame$):..|
|000013f0| 05 6e 0d e7 20 63 68 61 | 6e 25 20 e1 0d 05 78 0f |.n.. cha|n% ...x.|
|00001400| 66 69 6e 69 73 68 65 64 | 25 3d a3 0d 05 82 38 46 |finished|%=....8F|
|00001410| 24 3d 6d 79 5f 76 61 72 | 24 2b 22 2e 46 69 6c 65 |$=my_var|$+".File|
|00001420| 73 22 3a 63 68 61 6e 25 | 3d 8e 20 46 24 3a e7 20 |s":chan%|=. F$:. |
|00001430| 63 68 61 6e 25 3d 30 20 | 66 69 6e 69 73 68 65 64 |chan%=0 |finished|
|00001440| 25 3d b9 0d 05 8c 05 e1 | 0d 05 96 04 0d 05 a0 24 |%=......|.......$|
|00001450| dd a4 6d 61 6c 6c 6f 63 | 28 53 25 29 3a ea 20 50 |..malloc|(S%):. P|
|00001460| 25 2c 51 25 3a e7 20 53 | 25 3c 34 20 53 25 3d 34 |%,Q%:. S|%<4 S%=4|
|00001470| 0d 05 aa 48 53 25 2b 3d | 28 53 25 20 83 20 32 29 |...HS%+=|(S% . 2)|
|00001480| 3a 51 25 3d 53 25 2b 33 | 3a 5f 6d 65 6d 6f 72 79 |:Q%=S%+3|:_memory|
|00001490| 25 3d 5f 6d 65 6d 6f 72 | 79 25 3a e7 20 5f 6d 65 |%=_memor|y%:. _me|
|000014a0| 6d 6f 72 79 25 20 50 25 | 3d a4 66 69 6e 64 5f 73 |mory% P%|=.find_s|
|000014b0| 70 61 63 65 28 53 25 29 | 0d 05 b4 1c e7 20 50 25 |pace(S%)|..... P%|
|000014c0| 3d 30 20 80 20 28 28 93 | 2d e0 29 3c 53 25 29 20 |=0 . ((.|-.)<S%) |
|000014d0| 8c 20 3d 30 0d 05 be 1f | e7 20 50 25 3d 30 20 de |. =0....|. P%=0 .|
|000014e0| 20 50 25 20 51 25 3a 21 | 50 25 3d 53 25 3a 50 25 | P% Q%:!|P%=S%:P%|
|000014f0| 2b 3d 34 0d 05 c8 07 3d | 50 25 0d 05 d2 04 0d 05 |+=4....=|P%......|
|00001500| dc 0e dd f2 66 72 65 65 | 28 4c 25 29 0d 05 e6 32 |....free|(L%)...2|
|00001510| 5f 6d 65 6d 6f 72 79 25 | 3d 5f 6d 65 6d 6f 72 79 |_memory%|=_memory|
|00001520| 25 3a e7 20 5f 6d 65 6d | 6f 72 79 25 20 4c 25 3d |%:. _mem|ory% L%=|
|00001530| a4 63 68 65 63 6b 5f 6d | 65 6d 28 4c 25 29 0d 05 |.check_m|em(L%)..|
|00001540| f0 1c 21 4c 25 3d 5f 6d | 65 6d 6f 72 79 25 3a 5f |..!L%=_m|emory%:_|
|00001550| 6d 65 6d 6f 72 79 25 3d | 4c 25 0d 05 fa 05 e1 0d |memory%=|L%......|
|00001560| 06 04 04 0d 06 0e 2e dd | a4 66 69 6e 64 5f 73 70 |........|.find_sp|
|00001570| 61 63 65 28 53 25 29 3a | ea 20 41 25 2c 46 25 2c |ace(S%):|. A%,F%,|
|00001580| 50 25 2c 4d 25 2c 51 25 | 2c 4c 25 2c 4b 25 2c 4e |P%,M%,Q%|,L%,K%,N|
|00001590| 25 0d 06 18 25 4c 25 3d | 30 3a 46 25 3d 30 3a 4d |%...%L%=|0:F%=0:M|
|000015a0| 25 3d 31 36 37 37 37 32 | 31 36 3a 41 25 3d 5f 6d |%=167772|16:A%=_m|
|000015b0| 65 6d 6f 72 79 25 0d 06 | 22 0c c8 95 20 41 25 3c |emory%..|"... A%<|
|000015c0| 3e 30 0d 06 2c 33 20 20 | 51 25 3d 21 28 41 25 2d |>0..,3 |Q%=!(A%-|
|000015d0| 34 29 3a e7 20 51 25 3e | 3d 53 25 20 80 20 51 25 |4):. Q%>|=S% . Q%|
|000015e0| 3c 4d 25 20 46 25 3d 41 | 25 3a 4d 25 3d 51 25 3a |<M% F%=A|%:M%=Q%:|
|000015f0| 4b 25 3d 4c 25 0d 06 36 | 12 20 20 4c 25 3d 41 25 |K%=L%..6|. L%=A%|
|00001600| 3a 41 25 3d 21 41 25 0d | 06 40 05 ce 0d 06 4a 16 |:A%=!A%.|.@....J.|
|00001610| e7 20 46 25 3d 30 20 3d | 30 3a 8b 20 4e 25 3d 21 |. F%=0 =|0:. N%=!|
|00001620| 46 25 0d 06 54 47 e7 20 | 28 4d 25 2d 53 25 29 3e |F%..TG. |(M%-S%)>|
|00001630| 37 20 21 28 46 25 2d 34 | 29 3d 53 25 3a 21 28 46 |7 !(F%-4|)=S%:!(F|
|00001640| 25 2b 53 25 29 3d 28 4d | 25 2d 53 25 2d 34 29 3a |%+S%)=(M|%-S%-4):|
|00001650| 21 28 46 25 2b 53 25 2b | 34 29 3d 21 46 25 3a 4e |!(F%+S%+|4)=!F%:N|
|00001660| 25 3d 46 25 2b 53 25 2b | 34 0d 06 5e 14 f2 73 65 |%=F%+S%+|4..^..se|
|00001670| 74 5f 70 72 65 76 28 4b | 25 2c 4e 25 29 0d 06 68 |t_prev(K|%,N%)..h|
|00001680| 07 3d 46 25 0d 06 72 04 | 0d 06 7c 21 dd a4 63 68 |.=F%..r.|..|!..ch|
|00001690| 65 63 6b 5f 6d 65 6d 28 | 4c 25 29 3a ea 20 41 25 |eck_mem(|L%):. A%|
|000016a0| 2c 51 25 2c 53 25 2c 50 | 25 0d 06 86 2c 50 25 3d |,Q%,S%,P|%...,P%=|
|000016b0| 30 3a 53 25 3d 21 28 4c | 25 2d 34 29 3a 41 25 3d |0:S%=!(L|%-4):A%=|
|000016c0| 5f 6d 65 6d 6f 72 79 25 | 3a f5 3a 51 25 3d 21 28 |_memory%|:.:Q%=!(|
|000016d0| 41 25 2d 34 29 0d 06 90 | 89 e7 20 28 41 25 2b 51 |A%-4)...|.. (A%+Q|
|000016e0| 25 29 3d 28 4c 25 2d 34 | 29 20 53 25 3d 53 25 2b |%)=(L%-4|) S%=S%+|
|000016f0| 51 25 2b 34 3a 21 28 41 | 25 2d 34 29 3d 53 25 3a |Q%+4:!(A|%-4)=S%:|
|00001700| 4c 25 3d 41 25 3a f2 73 | 65 74 5f 70 72 65 76 28 |L%=A%:.s|et_prev(|
|00001710| 50 25 2c 21 41 25 29 3a | 41 25 3d 50 25 3a 8b 20 |P%,!A%):|A%=P%:. |
|00001720| e7 20 28 4c 25 2b 53 25 | 29 3d 28 41 25 2d 34 29 |. (L%+S%|)=(A%-4)|
|00001730| 20 f2 73 65 74 5f 70 72 | 65 76 28 50 25 2c 21 41 | .set_pr|ev(P%,!A|
|00001740| 25 29 3a 53 25 3d 53 25 | 2b 51 25 2b 34 3a 21 28 |%):S%=S%|+Q%+4:!(|
|00001750| 4c 25 2d 34 29 3d 53 25 | 3a 41 25 3d 50 25 0d 06 |L%-4)=S%|:A%=P%..|
|00001760| 9a 26 50 25 3d 41 25 3a | e7 20 41 25 3c 3e 30 20 |.&P%=A%:|. A%<>0 |
|00001770| 41 25 3d 21 41 25 3a 8b | 20 41 25 3d 5f 6d 65 6d |A%=!A%:.| A%=_mem|
|00001780| 6f 72 79 25 0d 06 a4 0a | fd 20 41 25 3d 30 0d 06 |ory%....|. A%=0..|
|00001790| ae 07 3d 4c 25 0d 06 b8 | 04 0d 06 c2 15 dd f2 73 |..=L%...|.......s|
|000017a0| 65 74 5f 70 72 65 76 28 | 4b 25 2c 4e 25 29 0d 06 |et_prev(|K%,N%)..|
|000017b0| cc 1f e7 20 4b 25 3d 30 | 20 5f 6d 65 6d 6f 72 79 |... K%=0| _memory|
|000017c0| 25 3d 4e 25 3a 8b 20 21 | 4b 25 3d 4e 25 0d 06 d6 |%=N%:. !|K%=N%...|
|000017d0| 05 e1 0d 06 e0 04 0d 06 | ea 15 dd f2 70 75 74 5f |........|....put_|
|000017e0| 69 63 6f 6e 28 6e 25 2c | 69 24 29 0d 06 f4 14 69 |icon(n%,|i$)....i|
|000017f0| 5f 74 65 6d 70 25 21 30 | 3d 68 77 6f 72 6b 25 0d |_temp%!0|=hwork%.|
|00001800| 06 fe 10 69 5f 74 65 6d | 70 25 21 34 3d 6e 25 0d |...i_tem|p%!4=n%.|
|00001810| 07 08 22 c8 99 22 57 69 | 6d 70 5f 47 65 74 49 63 |..".."Wi|mp_GetIc|
|00001820| 6f 6e 53 74 61 74 65 22 | 2c 2c 69 5f 74 65 6d 70 |onState"|,,i_temp|
|00001830| 25 0d 07 12 14 24 28 69 | 5f 74 65 6d 70 25 21 32 |%....$(i|_temp%!2|
|00001840| 38 29 3d 69 24 0d 07 1c | 0f 69 5f 74 65 6d 70 25 |8)=i$...|.i_temp%|
|00001850| 21 38 3d 30 0d 07 26 10 | 69 5f 74 65 6d 70 25 21 |!8=0..&.|i_temp%!|
|00001860| 31 32 3d 30 0d 07 30 22 | c8 99 22 57 69 6d 70 5f |12=0..0"|.."Wimp_|
|00001870| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 69 |SetIconS|tate",,i|
|00001880| 5f 74 65 6d 70 25 0d 07 | 3a 05 e1 0d 07 44 04 0d |_temp%..|:....D..|
|00001890| 07 4e 0e dd a4 6d 6f 64 | 65 5f 65 6e 64 0d 07 58 |.N...mod|e_end..X|
|000018a0| 13 ea 20 56 2c 43 25 2c | 41 24 3a 41 24 3d 22 22 |.. V,C%,|A$:A$=""|
|000018b0| 0d 07 62 3b c8 99 22 58 | 57 69 6d 70 5f 52 65 61 |..b;.."X|Wimp_Rea|
|000018c0| 64 53 79 73 49 6e 66 6f | 22 2c 32 20 b8 20 43 25 |dSysInfo|",2 . C%|
|000018d0| 3b 56 3a e7 28 56 20 80 | 20 31 29 3d 30 20 41 24 |;V:.(V .| 1)=0 A$|
|000018e0| 3d bd 3f 43 25 2b bd 43 | 25 3f 31 0d 07 6c 07 3d |=.?C%+.C|%?1..l.=|
|000018f0| 41 24 0d 07 76 04 0d 07 | 80 0f dd f2 72 65 61 64 |A$..v...|....read|
|00001900| 5f 70 61 73 73 0d 07 8a | 1a ea 20 43 25 2c 41 25 |_pass...|.. C%,A%|
|00001910| 2c 42 25 2c 46 24 3a 70 | 61 73 73 24 3d 22 22 0d |,B%,F$:p|ass$="".|
|00001920| 07 94 2b 46 24 3d 6d 79 | 5f 76 61 72 24 2b 22 2e |..+F$=my|_var$+".|
|00001930| 50 61 73 73 77 6f 72 64 | 22 3a 43 25 3d 8e 20 46 |Password|":C%=. F|
|00001940| 24 3a 6f 70 65 6e 25 3d | 43 25 0d 07 9e 3f e7 20 |$:open%=|C%...?. |
|00001950| 43 25 3d 30 20 6c 6f 63 | 6b 25 3d a3 3a f2 77 69 |C%=0 loc|k%=.:.wi|
|00001960| 6d 70 5f 65 72 72 6f 72 | 28 30 2c 22 4e 6f 20 70 |mp_error|(0,"No p|
|00001970| 61 73 73 77 6f 72 64 20 | 66 69 6c 65 22 2c 6d 79 |assword |file",my|
|00001980| 5f 6e 61 6d 65 24 29 3a | e1 0d 07 a8 35 41 25 3d |_name$):|....5A%=|
|00001990| 9a 23 43 25 3a e3 20 42 | 25 3d 31 20 b8 20 41 25 |.#C%:. B|%=1 . A%|
|000019a0| 3a 70 61 73 73 24 2b 3d | bd 28 9a 23 43 25 29 3a |:pass$+=|.(.#C%):|
|000019b0| ed 3a d9 23 43 25 3a 6f | 70 65 6e 25 3d 30 0d 07 |.:.#C%:o|pen%=0..|
|000019c0| b2 05 e1 0d 07 bc 04 0d | 07 c6 0f dd a4 63 6f 64 |........|.....cod|
|000019d0| 65 28 69 6e 24 29 0d 07 | d0 1a ea 20 6f 75 74 24 |e(in$)..|... out$|
|000019e0| 2c 74 6f 74 61 6c 25 2c | 6c 25 2c 6d 25 2c 44 25 |,total%,|l%,m%,D%|
|000019f0| 0d 07 da 14 6f 75 74 24 | 3d 22 22 3a 74 6f 74 61 |....out$|="":tota|
|00001a00| 6c 25 3d 30 0d 07 e4 13 | e3 20 41 25 3d 31 20 b8 |l%=0....|. A%=1 .|
|00001a10| 20 a9 28 69 6e 24 29 0d | 07 ee 32 6c 25 3d 97 28 | .(in$).|..2l%=.(|
|00001a20| c1 69 6e 24 2c 41 25 2c | 31 29 29 3a 6d 25 3d 97 |.in$,A%,|1)):m%=.|
|00001a30| 28 c1 69 6e 24 2c 28 41 | 25 2b 33 29 83 28 a9 28 |(.in$,(A|%+3).(.(|
|00001a40| 69 6e 24 29 29 2b 31 29 | 29 0d 07 f8 5a 74 6f 74 |in$))+1)|)...Ztot|
|00001a50| 61 6c 25 3d 74 6f 74 61 | 6c 25 2b 6c 25 3a 44 25 |al%=tota|l%+l%:D%|
|00001a60| 3d 97 28 c1 22 36 68 50 | 23 3d 7e 3f 5b 60 2b 7c |=.(."6hP|#=~?[`+||
|00001a70| 21 51 5e 7c 55 4d 69 58 | 65 52 2a 30 26 36 2b 56 |!Q^|UMiX|eR*0&6+V|
|00001a80| 42 62 21 27 5e 5b 60 5f | 2d 34 25 72 2e 22 2c 28 |Bb!'^[`_|-4%r.",(|
|00001a90| 28 74 6f 74 61 6c 25 29 | 83 20 34 30 29 2b 31 2c |(total%)|. 40)+1,|
|00001aa0| 31 29 29 0d 08 02 1e 6f | 75 74 24 3d 6f 75 74 24 |1))....o|ut$=out$|
|00001ab0| 2b bd 28 28 6c 25 20 82 | 20 44 25 29 82 20 6d 25 |+.((l% .| D%). m%|
|00001ac0| 29 0d 08 0c 0b ed 3a 3d | 6f 75 74 24 0d 08 16 04 |).....:=|out$....|
|00001ad0| 0d 08 20 0d dd f2 67 65 | 74 70 61 73 73 0d 08 2a |.. ...ge|tpass..*|
|00001ae0| 17 ea 20 50 24 2c 41 25 | 2c 4c 24 2c 4d 25 2c 45 |.. P$,A%|,L$,M%,E|
|00001af0| 25 2c 52 25 0d 08 34 11 | f5 3a 4c 24 3d 22 22 3a |%,R%..4.|.:L$="":|
|00001b00| 50 24 3d 22 22 0d 08 3e | 3a f5 3a 41 25 3d a6 28 |P$=""..>|:.:A%=.(|
|00001b10| 31 29 3a f2 63 68 65 63 | 6b 5f 66 69 6c 65 73 3a |1):.chec|k_files:|
|00001b20| c8 97 20 4d 25 2c 45 25 | 2c 52 25 3a f4 20 6b 69 |.. M%,E%|,R%:. ki|
|00001b30| 6c 6c 20 6d 6f 75 73 65 | 20 65 76 65 6e 74 73 0d |ll mouse| events.|
|00001b40| 08 48 31 e7 20 41 25 3e | 33 31 20 80 20 41 25 3c |.H1. A%>|31 . A%<|
|00001b50| 31 32 37 20 80 20 a9 28 | 4c 24 29 3c 31 35 20 50 |127 . .(|L$)<15 P|
|00001b60| 24 2b 3d bd 28 41 25 29 | 3a 4c 24 2b 3d 22 2a 22 |$+=.(A%)|:L$+="*"|
|00001b70| 0d 08 52 2e e7 20 28 41 | 25 3d 31 32 37 20 84 20 |..R.. (A|%=127 . |
|00001b80| 41 25 3d 38 29 20 80 20 | 4c 24 3c 3e 22 22 20 4c |A%=8) . |L$<>"" L|
|00001b90| 24 3d c0 4c 24 29 3a 50 | 24 3d c0 50 24 29 0d 08 |$=.L$):P|$=.P$)..|
|00001ba0| 5c 1a e7 20 41 25 3e 30 | 20 f2 70 75 74 5f 69 63 |\.. A%>0| .put_ic|
|00001bb0| 6f 6e 28 35 2c 4c 24 29 | 0d 08 66 0b fd 20 41 25 |on(5,L$)|..f.. A%|
|00001bc0| 3d 31 33 0d 08 70 0e e7 | 20 50 24 3c 3e 22 22 20 |=13..p..| P$<>"" |
|00001bd0| 8c 0d 08 7a 55 20 20 e7 | 20 a4 63 6f 64 65 28 50 |...zU .| .code(P|
|00001be0| 24 29 3d 70 61 73 73 24 | 20 6c 6f 63 6b 25 3d a3 |$)=pass$| lock%=.|
|00001bf0| 3a 21 77 77 6f 72 6b 25 | 3d 68 77 6f 72 6b 25 3a |:!wwork%|=hwork%:|
|00001c00| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00001c10| 6e 64 6f 77 22 2c 2c 77 | 77 6f 72 6b 25 3a 77 6f |ndow",,w|work%:wo|
|00001c20| 70 65 6e 25 3d 30 0d 08 | 84 15 20 20 f2 70 75 74 |pen%=0..|.. .put|
|00001c30| 5f 69 63 6f 6e 28 35 2c | 22 22 29 0d 08 8e 05 cd |_icon(5,|"").....|
|00001c40| 0d 08 98 0e fd 20 ac 28 | 6c 6f 63 6b 25 29 0d 08 |..... .(|lock%)..|
|00001c50| a2 05 e1 0d 08 ac 04 0d | 08 b6 11 dd f2 63 68 65 |........|.....che|
|00001c60| 63 6b 5f 66 69 6c 65 73 | 0d 08 c0 2f ea 20 4c 25 |ck_files|.../. L%|
|00001c70| 2c 41 25 2c 45 25 2c 4f | 25 2c 54 24 2c 74 25 2c |,A%,E%,O|%,T$,t%,|
|00001c80| 50 24 2c 61 25 2c 6c 25 | 2c 6d 25 2c 65 25 2c 52 |P$,a%,l%|,m%,e%,R|
|00001c90| 24 3a 52 24 3d 22 22 0d | 08 ca 0d e7 20 73 63 61 |$:R$="".|.... sca|
|00001ca0| 6e 25 20 e1 0d 08 d4 11 | e7 20 66 69 6e 69 73 68 |n% .....|. finish|
|00001cb0| 65 64 25 20 8c 0d 08 de | 0f 20 20 e7 20 74 6f 67 |ed% ....|. . tog|
|00001cc0| 6f 25 20 8c 0d 08 e8 32 | 20 20 20 20 50 24 3d 6d |o% ....2| P$=m|
|00001cd0| 79 5f 76 61 72 24 2b 22 | 2e 46 69 6c 65 73 22 3a |y_var$+"|.Files":|
|00001ce0| 63 68 61 6e 25 3d 8e 20 | 50 24 3a e7 20 63 68 61 |chan%=. |P$:. cha|
|00001cf0| 6e 25 3d 30 20 e1 0d 08 | f2 32 20 20 20 20 cf 23 |n%=0 ...|.2 .#|
|00001d00| 63 68 61 6e 25 3d b3 28 | a2 23 63 68 61 6e 25 29 |chan%=.(|.#chan%)|
|00001d10| 3a 6c 61 73 74 25 3d a4 | 67 65 74 74 69 6d 65 3a |:last%=.|gettime:|
|00001d20| 74 6f 67 6f 25 2d 3d 31 | 0d 08 fc 26 20 20 20 20 |togo%-=1|...& |
|00001d30| 54 24 3d be 23 63 68 61 | 6e 25 3a e7 20 c5 23 63 |T$=.#cha|n%:. .#c|
|00001d40| 68 61 6e 25 20 8f 23 63 | 68 61 6e 25 3d 30 0d 09 |han% .#c|han%=0..|
|00001d50| 06 07 20 20 cc 0d 09 10 | 2b 20 20 20 20 74 25 3d |.. ....|+ t%=|
|00001d60| a4 67 65 74 74 69 6d 65 | 3a e7 20 74 25 3c 6c 61 |.gettime|:. t%<la|
|00001d70| 73 74 25 20 6c 61 73 74 | 25 2d 3d 38 36 34 30 30 |st% last|%-=86400|
|00001d80| 0d 09 1a 2e 20 20 20 20 | e7 20 70 65 72 69 6f 64 |.... |. period|
|00001d90| 25 3d 30 20 84 20 28 28 | 6c 61 73 74 25 2b 70 65 |%=0 . ((|last%+pe|
|00001da0| 72 69 6f 64 25 29 20 3e | 20 74 25 29 20 e1 0d 09 |riod%) >| t%) ...|
|00001db0| 24 17 20 20 20 20 74 6f | 67 6f 25 3d 6e 75 6d 62 |$. to|go%=numb|
|00001dc0| 65 72 25 3a e1 0d 09 2e | 07 20 20 cd 0d 09 38 05 |er%:....|. ...8.|
|00001dd0| cd 0d 09 42 2b e7 20 c5 | 23 63 68 61 6e 25 20 66 |...B+. .|#chan% f|
|00001de0| 69 6e 69 73 68 65 64 25 | 3d b9 3a d9 23 63 68 61 |inished%|=.:.#cha|
|00001df0| 6e 25 3a 63 68 61 6e 25 | 3d 30 3a e1 0d 09 4c 0e |n%:chan%|=0:...L.|
|00001e00| 54 24 3d be 23 63 68 61 | 6e 25 0d 09 56 26 e7 20 |T$=.#cha|n%..V&. |
|00001e10| 28 a7 54 24 2c 22 26 22 | 29 3e 30 29 20 80 20 28 |(.T$,"&"|)>0) . (|
|00001e20| b3 28 31 30 30 29 3c 3d | 72 61 6e 64 25 29 20 8c |.(100)<=|rand%) .|
|00001e30| 0d 09 60 18 20 20 50 24 | 3d c0 54 24 2c a7 54 24 |..`. P$|=.T$,.T$|
|00001e40| 2c 22 20 22 29 2d 31 29 | 0d 09 6a 21 20 20 54 24 |," ")-1)|..j! T$|
|00001e50| 3d c1 54 24 2c a7 54 24 | 2c 22 20 22 29 2b 31 29 |=.T$,.T$|," ")+1)|
|00001e60| 3a 4c 25 3d a0 28 54 24 | 29 0d 09 74 21 20 20 54 |:L%=.(T$|)..t! T|
|00001e70| 24 3d c1 54 24 2c a7 54 | 24 2c 22 20 22 29 2b 31 |$=.T$,.T|$," ")+1|
|00001e80| 29 3a 41 25 3d a0 28 54 | 24 29 0d 09 7e 21 20 20 |):A%=.(T|$)..~! |
|00001e90| 54 24 3d c1 54 24 2c a7 | 54 24 2c 22 20 22 29 2b |T$=.T$,.|T$," ")+|
|00001ea0| 31 29 3a 45 25 3d a0 28 | 54 24 29 0d 09 88 26 20 |1):E%=.(|T$)...& |
|00001eb0| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 35 2c | .. "OS_|File",5,|
|00001ec0| 50 24 20 b8 20 74 25 2c | 2c 61 25 2c 65 25 2c 6c |P$ . t%,|,a%,e%,l|
|00001ed0| 25 0d 09 92 0e 20 20 e7 | 20 74 25 3d 30 20 8c 0d |%.... .| t%=0 ..|
|00001ee0| 09 9c 14 20 20 20 20 52 | 24 3d 22 72 65 6d 6f 76 |... R|$="remov|
|00001ef0| 65 64 22 0d 09 a6 07 20 | 20 cc 0d 09 b0 26 20 20 |ed".... | ....& |
|00001f00| 20 20 e7 20 61 25 3c 3e | 41 25 20 84 20 65 25 3c | . a%<>|A% . e%<|
|00001f10| 3e 45 25 20 52 24 3d 22 | 75 70 64 61 74 65 64 22 |>E% R$="|updated"|
|00001f20| 0d 09 ba 34 20 20 20 20 | e7 20 6c 25 3e 4c 25 20 |...4 |. l%>L% |
|00001f30| 52 24 3d 22 65 78 74 65 | 6e 64 65 64 22 3a 8b 20 |R$="exte|nded":. |
|00001f40| e7 20 6c 25 3c 4c 25 20 | 52 24 3d 22 72 65 64 75 |. l%<L% |R$="redu|
|00001f50| 63 65 64 22 0d 09 c4 07 | 20 20 cd 0d 09 ce 39 20 |ced"....| ....9 |
|00001f60| 20 e7 20 52 24 3c 3e 22 | 22 20 f2 77 69 6d 70 5f | . R$<>"|" .wimp_|
|00001f70| 65 72 72 6f 72 28 30 2c | 50 24 2b 22 20 68 61 73 |error(0,|P$+" has|
|00001f80| 20 62 65 65 6e 20 22 2b | 52 24 2c 6d 79 5f 6e 61 | been "+|R$,my_na|
|00001f90| 6d 65 24 29 0d 09 d8 05 | cd 0d 09 e2 1f e7 20 66 |me$)....|...... f|
|00001fa0| 69 6e 69 73 68 65 64 25 | 20 d9 23 63 68 61 6e 25 |inished%| .#chan%|
|00001fb0| 3a 63 68 61 6e 25 3d 30 | 0d 09 ec 05 e1 0d 09 f6 |:chan%=0|........|
|00001fc0| 04 0d 0a 00 0b dd f2 65 | 72 72 6f 72 0d 0a 0a 13 |.......e|rror....|
|00001fd0| e7 20 63 68 61 6e 25 20 | d9 23 63 68 61 6e 25 0d |. chan% |.#chan%.|
|00001fe0| 0a 14 1b e7 20 6f 70 65 | 6e 25 20 d9 23 6f 70 65 |.... ope|n% .#ope|
|00001ff0| 6e 25 3a 6f 70 65 6e 25 | 3d 30 0d 0a 1e 1e e7 20 |n%:open%|=0..... |
|00002000| 6f 70 65 6e 32 25 20 d9 | 23 6f 70 65 6e 32 25 3a |open2% .|#open2%:|
|00002010| 6f 70 65 6e 32 25 3d 30 | 0d 0a 28 2f f2 77 69 6d |open2%=0|..(/.wim|
|00002020| 70 5f 65 72 72 6f 72 28 | 9f 2c f6 24 2b 22 20 61 |p_error(|.,.$+" a|
|00002030| 74 20 6c 69 6e 65 20 22 | 2b c3 28 9e 29 2c 6d 79 |t line "|+.(.),my|
|00002040| 5f 6e 61 6d 65 24 29 0d | 0a 32 05 e1 0d 0a 3c 04 |_name$).|.2....<.|
|00002050| 0d 0a 46 13 dd f2 67 69 | 76 65 5f 75 70 28 f8 20 |..F...gi|ve_up(. |
|00002060| 52 24 29 0d 0a 50 0e ea | 20 46 24 2c 4c 25 2c 58 |R$)..P..| F$,L%,X|
|00002070| 25 0d 0a 5a 20 c8 99 20 | 22 4f 53 5f 42 79 74 65 |%..Z .. |"OS_Byte|
|00002080| 22 2c 32 35 33 2c 30 2c | 32 35 35 20 b8 20 2c 58 |",253,0,|255 . ,X|
|00002090| 25 0d 0a 64 0c e7 20 58 | 25 3d 31 20 e1 0d 0a 6e |%..d.. X|%=1 ...n|
|000020a0| 09 52 24 3d 22 22 0d 0a | 78 05 e1 0d 0a 82 04 0d |.R$=""..|x.......|
|000020b0| 0a 8c 31 dd a4 63 72 65 | 61 74 65 5f 6d 65 6e 75 |..1..cre|ate_menu|
|000020c0| 28 54 24 2c 46 43 25 2c | 42 43 25 2c 57 46 25 2c |(T$,FC%,|BC%,WF%,|
|000020d0| 57 42 25 2c 6f 70 74 73 | 24 28 29 2c 4f 4d 25 29 |WB%,opts|$(),OM%)|
|000020e0| 0d 0a 96 35 ea 20 58 58 | 25 2c 54 43 25 2c 53 25 |...5. XX|%,TC%,S%|
|000020f0| 2c 41 25 2c 42 25 2c 43 | 25 2c 50 25 2c 6d 65 6e |,A%,B%,C|%,P%,men|
|00002100| 75 25 2c 4d 24 3a 53 25 | 3d de 28 6f 70 74 73 24 |u%,M$:S%|=.(opts$|
|00002110| 28 29 2c 31 29 0d 0a a0 | 2a e7 20 4f 4d 25 20 6d |(),1)...|*. OM% m|
|00002120| 65 6e 75 25 3d 4f 4d 25 | 3a 8b 20 de 20 6d 65 6e |enu%=OM%|:. . men|
|00002130| 75 25 20 32 39 2b 32 34 | 2a 28 53 25 2b 31 29 0d |u% 29+24|*(S%+1).|
|00002140| 0a aa 47 24 6d 65 6e 75 | 25 3d 54 24 3a 6d 65 6e |..G$menu|%=T$:men|
|00002150| 75 25 3f a9 28 54 24 29 | 3d 30 3a 6d 65 6e 75 25 |u%?.(T$)|=0:menu%|
|00002160| 21 31 32 3d 28 28 57 42 | 25 2a 26 31 30 30 2b 57 |!12=((WB|%*&100+W|
|00002170| 46 25 29 2a 26 31 30 30 | 2b 42 43 25 29 2a 26 31 |F%)*&100|+BC%)*&1|
|00002180| 30 30 2b 46 43 25 0d 0a | b4 27 6d 65 6e 75 25 21 |00+FC%..|.'menu%!|
|00002190| 31 36 3d 31 37 32 3a 6d | 65 6e 75 25 21 32 30 3d |16=172:m|enu%!20=|
|000021a0| 34 34 3a 6d 65 6e 75 25 | 21 32 34 3d 30 0d 0a be |44:menu%|!24=0...|
|000021b0| 49 e3 20 41 25 3d 30 20 | b8 20 53 25 3a 4d 24 3d |I. A%=0 |. S%:M$=|
|000021c0| 6f 70 74 73 24 28 41 25 | 29 3a 42 25 3d 30 3a 43 |opts$(A%|):B%=0:C|
|000021d0| 25 3d 2d 31 3a 50 25 3d | 6d 65 6e 75 25 2b 32 38 |%=-1:P%=|menu%+28|
|000021e0| 2b 41 25 2a 32 34 3a 54 | 43 25 3d 57 46 25 3a 58 |+A%*24:T|C%=WF%:X|
|000021f0| 58 25 3d 26 32 31 0d 0a | c8 3d e7 20 c2 4d 24 29 |X%=&21..|.=. .M$)|
|00002200| 3d 22 a4 22 20 42 25 3d | 42 25 20 84 20 38 3a 4d |="." B%=|B% . 8:M|
|00002210| 24 3d c0 4d 24 29 3a 54 | 43 25 3d 28 57 46 25 2b |$=.M$):T|C%=(WF%+|
|00002220| 57 42 25 29 81 20 32 3a | 58 58 25 3d 26 34 30 30 |WB%). 2:|XX%=&400|
|00002230| 30 32 31 0d 0a d2 20 e7 | 20 c2 4d 24 29 3d 22 2f |021... .| .M$)="/|
|00002240| 22 20 42 25 3d 42 25 20 | 84 20 31 3a 4d 24 3d c0 |" B%=B% |. 1:M$=.|
|00002250| 4d 24 29 0d 0a dc 20 e7 | 20 c2 4d 24 29 3d 22 5f |M$)... .| .M$)="_|
|00002260| 22 20 42 25 3d 42 25 20 | 84 20 32 3a 4d 24 3d c0 |" B%=B% |. 2:M$=.|
|00002270| 4d 24 29 0d 0a e6 17 e7 | 20 41 25 3d 53 25 20 42 |M$).....| A%=S% B|
|00002280| 25 3d 42 25 20 84 20 31 | 32 38 0d 0a f0 10 e7 20 |%=B% . 1|28..... |
|00002290| c2 4d 24 29 3d 22 3c 22 | 20 8c 0d 0a fa 4e 20 20 |.M$)="<"| ....N |
|000022a0| 42 25 3d 42 25 20 84 20 | 34 3a 21 50 25 3d 42 25 |B%=B% . |4:!P%=B%|
|000022b0| 3a 50 25 21 34 3d 43 25 | 3a 50 25 21 38 3d 28 28 |:P%!4=C%|:P%!8=((|
|000022c0| 57 42 25 2a 26 31 30 2b | 54 43 25 29 80 20 26 46 |WB%*&10+|TC%). &F|
|000022d0| 46 29 2a 26 31 30 30 30 | 30 30 30 20 84 20 26 31 |F)*&1000|000 . &1|
|000022e0| 30 30 20 84 20 58 58 25 | 0d 0b 04 29 20 20 4d 24 |00 . XX%|...) M$|
|000022f0| 3d c0 4d 24 29 3a 42 25 | 3d a7 4d 24 2c 22 3e 22 |=.M$):B%|=.M$,">"|
|00002300| 29 3a 43 25 3d a0 28 c1 | 4d 24 2c 42 25 2b 31 29 |):C%=.(.|M$,B%+1)|
|00002310| 29 0d 0b 0e 35 20 20 4d | 24 3d c0 4d 24 2c 42 25 |)...5 M|$=.M$,B%|
|00002320| 2d 31 29 3a 24 43 25 3d | 4d 24 3a 50 25 21 31 32 |-1):$C%=|M$:P%!12|
|00002330| 3d 43 25 3a 50 25 21 31 | 36 3d 2d 31 3a 50 25 21 |=C%:P%!1|6=-1:P%!|
|00002340| 32 30 3d 32 35 35 0d 0b | 18 05 cc 0d 0b 22 12 20 |20=255..|.....". |
|00002350| 20 e7 20 c2 4d 24 29 3d | 22 3e 22 20 8c 0d 0b 2c | . .M$)=|">" ...,|
|00002360| 37 20 20 20 20 21 50 25 | 3d 42 25 3a 50 25 21 38 |7 !P%|=B%:P%!8|
|00002370| 3d 28 28 57 42 25 2a 26 | 31 30 2b 54 43 25 29 80 |=((WB%*&|10+TC%).|
|00002380| 20 26 46 46 29 2a 26 31 | 30 30 30 30 30 30 20 84 | &FF)*&1|000000 .|
|00002390| 20 58 58 25 0d 0b 36 2b | 20 20 20 20 4d 24 3d c0 | XX%..6+| M$=.|
|000023a0| 4d 24 29 3a 42 25 3d a7 | 4d 24 2c 22 3c 22 29 3a |M$):B%=.|M$,"<"):|
|000023b0| 43 25 3d a0 28 c1 4d 24 | 2c 42 25 2b 31 29 29 0d |C%=.(.M$|,B%+1)).|
|000023c0| 0b 40 28 20 20 20 20 50 | 25 21 34 3d 43 25 3a 4d |.@( P|%!4=C%:M|
|000023d0| 24 3d c0 4d 24 2c 42 25 | 2d 31 29 3a 24 28 50 25 |$=.M$,B%|-1):$(P%|
|000023e0| 2b 31 32 29 3d 4d 24 0d | 0b 4a 07 20 20 cc 0d 0b |+12)=M$.|.J. ...|
|000023f0| 54 40 20 20 20 20 21 50 | 25 3d 42 25 3a 50 25 21 |T@ !P|%=B%:P%!|
|00002400| 34 3d 43 25 3a 50 25 21 | 38 3d 28 28 57 42 25 2a |4=C%:P%!|8=((WB%*|
|00002410| 26 31 30 2b 54 43 25 29 | 20 80 20 26 46 46 29 2a |&10+TC%)| . &FF)*|
|00002420| 26 31 30 30 30 30 30 30 | 20 84 20 58 58 25 0d 0b |&1000000| . XX%..|
|00002430| 5e 24 20 20 20 20 24 28 | 50 25 2b 31 32 29 3d 4d |^$ $(|P%+12)=M|
|00002440| 24 3a 3f 28 50 25 2b 31 | 32 2b a9 28 4d 24 29 29 |$:?(P%+1|2+.(M$))|
|00002450| 3d 30 0d 0b 68 07 20 20 | cd 0d 0b 72 05 cd 0d 0b |=0..h. |...r....|
|00002460| 7c 05 ed 0d 0b 86 0a 3d | 6d 65 6e 75 25 0d 0b 90 ||......=|menu%...|
|00002470| 04 0d 0b 9a 11 dd f2 6d | 65 6e 75 28 41 25 2c 42 |.......m|enu(A%,B|
|00002480| 25 29 0d 0b a4 0b c8 8e | 20 41 25 20 ca 0d 0b ae |%)......| A% ....|
|00002490| 22 20 20 c9 20 31 20 3a | 20 e7 20 42 25 3d 30 20 |" . 1 :| . B%=0 |
|000024a0| f2 73 63 61 6e 28 24 69 | 6e 5f 62 75 66 25 29 0d |.scan($i|n_buf%).|
|000024b0| 0b b8 26 20 20 c9 20 32 | 20 3a 20 e7 20 42 25 3d |..& . 2| : . B%=|
|000024c0| 30 20 f2 73 65 74 70 61 | 73 73 28 24 69 6e 5f 62 |0 .setpa|ss($in_b|
|000024d0| 75 66 32 25 29 0d 0b c2 | 25 20 20 c9 20 33 20 3a |uf2%)...|% . 3 :|
|000024e0| 20 e7 20 42 25 3d 30 20 | 72 61 6e 64 25 3d bb 28 | . B%=0 |rand%=.(|
|000024f0| 24 69 6e 5f 62 75 66 33 | 25 29 0d 0b cc 27 20 20 |$in_buf3|%)...' |
|00002500| c9 20 34 20 3a 20 e7 20 | 42 25 3d 30 20 70 65 72 |. 4 : . |B%=0 per|
|00002510| 69 6f 64 25 3d bb 28 24 | 69 6e 5f 62 75 66 34 25 |iod%=.($|in_buf4%|
|00002520| 29 0d 0b d6 27 20 20 c9 | 20 35 20 3a 20 e7 20 42 |)...' .| 5 : . B|
|00002530| 25 3d 30 20 6e 75 6d 62 | 65 72 25 3d bb 28 24 69 |%=0 numb|er%=.($i|
|00002540| 6e 5f 62 75 66 35 25 29 | 0d 0b e0 3d 20 20 c9 20 |n_buf5%)|...= . |
|00002550| 36 20 3a 20 62 61 6e 6e | 65 72 25 3d a3 3a 6c 6f |6 : bann|er%=.:lo|
|00002560| 63 6b 25 3d b9 3a 68 77 | 6f 72 6b 25 3d 70 68 61 |ck%=.:hw|ork%=pha|
|00002570| 6e 25 3a f2 72 65 61 64 | 5f 70 61 73 73 3a f2 62 |n%:.read|_pass:.b|
|00002580| 61 6e 6e 65 72 0d 0b ea | 17 20 20 c9 20 37 20 3a |anner...|. . 7 :|
|00002590| 20 f2 73 74 61 72 74 5f | 73 63 61 6e 0d 0b f4 13 | .start_|scan....|
|000025a0| 20 20 c9 20 38 20 3a 20 | 71 75 69 74 25 3d b9 0d | . 8 : |quit%=..|
|000025b0| 0b fe 05 cb 0d 0c 08 05 | e1 0d 0c 12 04 0d 0c 1c |........|........|
|000025c0| 0f dd a4 6c 6f 77 65 72 | 28 41 24 29 0d 0c 26 14 |...lower|(A$)..&.|
|000025d0| ea 20 42 24 2c 41 25 2c | 43 25 3a 42 24 3d 22 22 |. B$,A%,|C%:B$=""|
|000025e0| 0d 0c 30 0f e7 20 41 24 | 3d 22 22 20 3d 22 22 0d |..0.. A$|="" ="".|
|000025f0| 0c 3a 22 e3 20 41 25 3d | 31 20 b8 20 a9 28 41 24 |.:". A%=|1 . .(A$|
|00002600| 29 3a 43 25 3d 97 28 c1 | 41 24 2c 41 25 2c 31 29 |):C%=.(.|A$,A%,1)|
|00002610| 29 0d 0c 44 1a e7 20 43 | 25 3e 36 34 20 80 20 43 |)..D.. C|%>64 . C|
|00002620| 25 3c 39 31 20 43 25 2b | 3d 33 32 0d 0c 4e 0f 42 |%<91 C%+|=32..N.B|
|00002630| 24 2b 3d bd 28 43 25 29 | 3a ed 0d 0c 58 07 3d 42 |$+=.(C%)|:...X.=B|
|00002640| 24 0d 0c 62 04 0d 0c 6c | 0e dd f2 73 63 61 6e 28 |$..b...l|...scan(|
|00002650| 41 24 29 0d 0c 76 23 ea | 20 49 25 2c 4f 25 2c 4c |A$)..v#.| I%,O%,L|
|00002660| 25 2c 4c 24 2c 4b 24 2c | 46 24 2c 6c 25 2c 65 25 |%,L$,K$,|F$,l%,e%|
|00002670| 2c 61 25 2c 74 25 0d 0c | 80 51 e7 20 73 63 61 6e |,a%,t%..|.Q. scan|
|00002680| 25 20 f2 77 69 6d 70 5f | 65 72 72 6f 72 28 30 2c |% .wimp_|error(0,|
|00002690| 22 47 69 76 65 20 6d 65 | 20 61 20 63 68 61 6e 63 |"Give me| a chanc|
|000026a0| 65 20 74 6f 20 66 69 6e | 69 73 68 20 74 68 65 20 |e to fin|ish the |
|000026b0| 6c 61 73 74 20 73 63 61 | 6e 21 22 2c 6d 79 5f 6e |last sca|n!",my_n|
|000026c0| 61 6d 65 24 29 3a e1 0d | 0c 8a 3a e7 20 41 24 3d |ame$):..|..:. A$=|
|000026d0| 22 22 20 f2 77 69 6d 70 | 5f 65 72 72 6f 72 28 30 |"" .wimp|_error(0|
|000026e0| 2c 22 43 61 6e 27 74 20 | 73 63 61 6e 20 6e 6f 74 |,"Can't |scan not|
|000026f0| 68 69 6e 67 22 2c 6d 79 | 5f 6e 61 6d 65 24 29 3a |hing",my|_name$):|
|00002700| e1 0d 0c 94 3f e7 20 ac | 28 66 69 6e 69 73 68 65 |....?. .|(finishe|
|00002710| 64 25 29 20 f2 77 69 6d | 70 5f 65 72 72 6f 72 28 |d%) .wim|p_error(|
|00002720| 30 2c 22 57 61 69 74 20 | 61 20 6d 6f 6d 65 6e 74 |0,"Wait |a moment|
|00002730| 2e 2e 2e 22 2c 6d 79 5f | 6e 61 6d 65 24 29 3a e1 |...",my_|name$):.|
|00002740| 0d 0c 9e 1d 72 65 6d 6f | 76 65 25 3d a3 3a e7 20 |....remo|ve%=.:. |
|00002750| a6 2d 31 20 72 65 6d 6f | 76 65 25 3d b9 0d 0c a8 |.-1 remo|ve%=....|
|00002760| 16 e7 20 a6 2d 32 20 f2 | 61 76 6f 69 64 28 41 24 |.. .-2 .|avoid(A$|
|00002770| 29 3a e1 0d 0c b2 3e 73 | 63 61 6e 25 3d b9 3a 4c |):....>s|can%=.:L|
|00002780| 24 3d a4 6c 6f 77 65 72 | 28 41 24 29 3a 4c 25 3d |$=.lower|(A$):L%=|
|00002790| a9 28 4c 24 29 3a 46 24 | 3d 6d 79 5f 76 61 72 24 |.(L$):F$|=my_var$|
|000027a0| 2b 22 2e 46 69 6c 65 73 | 22 3a 49 25 3d 8e 20 46 |+".Files|":I%=. F|
|000027b0| 24 0d 0c bc 0a e7 20 49 | 25 20 8c 0d 0c c6 33 20 |$..... I|% ....3 |
|000027c0| 20 6f 70 65 6e 25 3d 49 | 25 3a 46 24 3d 6d 79 5f | open%=I|%:F$=my_|
|000027d0| 76 61 72 24 2b 22 2e 54 | 65 6d 70 22 3a 4f 25 3d |var$+".T|emp":O%=|
|000027e0| ae 20 46 24 3a 6f 70 65 | 6e 32 25 3d 4f 25 0d 0c |. F$:ope|n2%=O%..|
|000027f0| d0 0d 20 20 f5 3a f2 70 | 6f 6c 6c 0d 0c da 2d 20 |.. .:.p|oll...- |
|00002800| 20 20 20 4b 24 3d be 23 | 49 25 3a e7 20 4c 24 3c | K$=.#|I%:. L$<|
|00002810| 3e c0 a4 6c 6f 77 65 72 | 28 4b 24 29 2c 4c 25 29 |>..lower|(K$),L%)|
|00002820| 20 d5 23 4f 25 2c 4b 24 | 0d 0c e4 27 20 20 fd 20 | .#O%,K$|...' . |
|00002830| c5 23 49 25 3a d9 23 49 | 25 3a d9 23 4f 25 3a 6f |.#I%:.#I|%:.#O%:o|
|00002840| 70 65 6e 25 3d 30 3a 6f | 70 65 6e 32 25 3d 30 0d |pen%=0:o|pen2%=0.|
|00002850| 0c ee 23 20 20 ff 28 22 | 44 45 4c 45 54 45 20 22 |..# .("|DELETE "|
|00002860| 2b 6d 79 5f 76 61 72 24 | 2b 22 2e 46 69 6c 65 73 |+my_var$|+".Files|
|00002870| 22 29 0d 0c f8 34 20 20 | ff 28 22 52 45 4e 41 4d |")...4 |.("RENAM|
|00002880| 45 20 22 2b 6d 79 5f 76 | 61 72 24 2b 22 2e 54 65 |E "+my_v|ar$+".Te|
|00002890| 6d 70 20 22 2b 6d 79 5f | 76 61 72 24 2b 22 2e 46 |mp "+my_|var$+".F|
|000028a0| 69 6c 65 73 22 29 0d 0d | 02 34 20 20 46 24 3d 6d |iles")..|.4 F$=m|
|000028b0| 79 5f 76 61 72 24 2b 22 | 2e 46 69 6c 65 73 22 3a |y_var$+"|.Files":|
|000028c0| 4f 25 3d ad 20 46 24 3a | cf 23 4f 25 3d a2 23 4f |O%=. F$:|.#O%=.#O|
|000028d0| 25 3a 6f 70 65 6e 25 3d | 4f 25 0d 0d 0c 05 cc 0d |%:open%=|O%......|
|000028e0| 0d 16 2a 20 20 46 24 3d | 6d 79 5f 76 61 72 24 2b |..* F$=|my_var$+|
|000028f0| 22 2e 46 69 6c 65 73 22 | 3a 4f 25 3d ae 20 46 24 |".Files"|:O%=. F$|
|00002900| 3a 6f 70 65 6e 25 3d 4f | 25 0d 0d 20 05 cd 0d 0d |:open%=O|%.. ....|
|00002910| 2a 24 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 |*$.. "OS|_File",5|
|00002920| 2c 41 24 20 b8 20 74 25 | 2c 2c 61 25 2c 65 25 2c |,A$ . t%|,,a%,e%,|
|00002930| 6c 25 0d 0d 34 19 e7 20 | 74 25 3d 32 20 80 20 ac |l%..4.. |t%=2 . .|
|00002940| 28 72 65 6d 6f 76 65 25 | 29 20 8c 0d 0d 3e 18 20 |(remove%|) ...>. |
|00002950| 20 6d 69 73 63 25 3d a4 | 6d 61 6c 6c 6f 63 28 32 | misc%=.|malloc(2|
|00002960| 35 36 29 0d 0d 48 19 20 | 20 61 76 6f 69 64 25 3d |56)..H. | avoid%=|
|00002970| a4 62 75 69 6c 64 5f 61 | 76 6f 69 64 0d 0d 52 15 |.build_a|void..R.|
|00002980| 20 20 f2 64 6f 5f 73 63 | 61 6e 28 4f 25 2c 41 24 | .do_sc|an(O%,A$|
|00002990| 29 0d 0d 5c 0f 20 20 c8 | 95 20 61 76 6f 69 64 25 |)..\. .|. avoid%|
|000029a0| 0d 0d 66 2a 20 20 20 20 | 61 25 3d 21 61 76 6f 69 |..f* |a%=!avoi|
|000029b0| 64 25 3a f2 66 72 65 65 | 28 61 76 6f 69 64 25 29 |d%:.free|(avoid%)|
|000029c0| 3a 61 76 6f 69 64 25 3d | 61 25 0d 0d 70 07 20 20 |:avoid%=|a%..p. |
|000029d0| ce 0d 0d 7a 12 20 20 f2 | 66 72 65 65 28 6d 69 73 |...z. .|free(mis|
|000029e0| 63 25 29 0d 0d 84 05 cc | 0d 0d 8e 37 20 20 e7 20 |c%).....|...7 . |
|000029f0| 74 25 3d 30 20 f2 77 69 | 6d 70 5f 65 72 72 6f 72 |t%=0 .wi|mp_error|
|00002a00| 28 30 2c 22 43 61 6e 27 | 74 20 6c 6f 63 61 74 65 |(0,"Can'|t locate|
|00002a10| 20 22 2b 41 24 2c 6d 79 | 5f 6e 61 6d 65 24 29 0d | "+A$,my|_name$).|
|00002a20| 0d 98 45 20 20 e7 20 74 | 25 3d 31 20 80 20 ac 28 |..E . t|%=1 . .(|
|00002a30| 72 65 6d 6f 76 65 25 29 | 20 d5 23 4f 25 2c 41 24 |remove%)| .#O%,A$|
|00002a40| 2b 22 20 26 22 2b c3 7e | 28 6c 25 29 2b 22 20 26 |+" &"+.~|(l%)+" &|
|00002a50| 22 2b c3 7e 28 61 25 29 | 2b 22 20 26 22 2b c3 7e |"+.~(a%)|+" &"+.~|
|00002a60| 28 65 25 29 0d 0d a2 05 | cd 0d 0d ac 10 d9 23 4f |(e%)....|......#O|
|00002a70| 25 3a 6f 70 65 6e 25 3d | 30 0d 0d b6 2f ff 28 22 |%:open%=|0.../.("|
|00002a80| 53 65 74 54 79 70 65 20 | 22 2b 6d 79 5f 76 61 72 |SetType |"+my_var|
|00002a90| 24 2b 22 2e 46 69 6c 65 | 73 20 54 65 78 74 22 29 |$+".File|s Text")|
|00002aa0| 3a 73 63 61 6e 25 3d a3 | 0d 0d c0 05 e1 0d 0d ca |:scan%=.|........|
|00002ab0| 04 0d 0d d4 14 dd f2 64 | 6f 5f 73 63 61 6e 28 43 |.......d|o_scan(C|
|00002ac0| 25 2c 52 24 29 0d 0d de | 3a ea 20 4c 25 2c 52 25 |%,R$)...|:. L%,R%|
|00002ad0| 2c 54 24 2c 54 25 2c 5a | 24 2c 58 24 2c 53 25 2c |,T$,T%,Z|$,X$,S%,|
|00002ae0| 50 25 3a 4c 25 3d 30 3a | 58 24 3d a4 6c 6f 77 65 |P%:L%=0:|X$=.lowe|
|00002af0| 72 28 52 24 29 2b 22 2e | 22 3a f2 70 6f 6c 6c 0d |r(R$)+".|":.poll.|
|00002b00| 0d e8 10 f5 3a 6d 69 73 | 63 25 21 31 36 3d 30 0d |....:mis|c%!16=0.|
|00002b10| 0d f2 37 c8 99 20 22 4f | 53 5f 47 42 50 42 22 2c |..7.. "O|S_GBPB",|
|00002b20| 31 30 2c 52 24 2c 6d 69 | 73 63 25 2c 31 2c 4c 25 |10,R$,mi|sc%,1,L%|
|00002b30| 2c 32 35 36 2c 22 2a 22 | 2b bd 28 30 29 20 b8 20 |,256,"*"|+.(0) . |
|00002b40| 2c 2c 2c 2c 4c 25 0d 0d | fc 21 e7 20 4c 25 3c 3e |,,,,L%..|.!. L%<>|
|00002b50| 2d 31 20 54 24 3d a4 73 | 74 72 69 6e 67 28 6d 69 |-1 T$=.s|tring(mi|
|00002b60| 73 63 25 2b 32 30 29 0d | 0e 06 23 5a 24 3d 58 24 |sc%+20).|..#Z$=X$|
|00002b70| 2b a4 6c 6f 77 65 72 28 | 54 24 29 3a 50 25 3d 61 |+.lower(|T$):P%=a|
|00002b80| 76 6f 69 64 25 3a 53 25 | 3d b9 0d 0e 10 09 c8 95 |void%:S%|=.......|
|00002b90| 20 50 25 0d 0e 1a 17 20 | 20 e7 20 5a 24 3d 24 28 | P%.... | . Z$=$(|
|00002ba0| 50 25 2b 34 29 20 53 25 | 3d a3 0d 0e 24 0c 20 20 |P%+4) S%|=...$. |
|00002bb0| 50 25 3d 21 50 25 0d 0e | 2e 05 ce 0d 0e 38 0a e7 |P%=!P%..|.....8..|
|00002bc0| 20 53 25 20 8c 0d 0e 42 | 29 20 20 e7 20 6d 69 73 | S% ...B|) . mis|
|00002bd0| 63 25 21 31 36 3d 32 20 | f2 64 6f 5f 73 63 61 6e |c%!16=2 |.do_scan|
|00002be0| 28 43 25 2c 52 24 2b 22 | 2e 22 2b 54 24 29 0d 0e |(C%,R$+"|."+T$)..|
|00002bf0| 4c 5b 20 20 54 25 3d 2d | 32 3a e7 20 6d 69 73 63 |L[ T%=-|2:. misc|
|00002c00| 25 21 31 36 3d 31 20 54 | 25 3d 28 21 6d 69 73 63 |%!16=1 T|%=(!misc|
|00002c10| 25 20 80 20 26 46 46 46 | 30 30 29 81 20 26 31 30 |% . &FFF|00). &10|
|00002c20| 30 3a e7 20 28 21 6d 69 | 73 63 25 20 80 20 26 46 |0:. (!mi|sc% . &F|
|00002c30| 46 46 30 30 30 30 30 29 | 3c 3e 26 46 46 46 30 30 |FF00000)|<>&FFF00|
|00002c40| 30 30 30 20 54 25 3d 2d | 31 0d 0e 56 2b 20 20 e7 |000 T%=-|1..V+ .|
|00002c50| 20 a4 73 68 6f 75 6c 64 | 5f 61 64 64 28 54 25 2c | .should|_add(T%,|
|00002c60| a4 6c 6f 77 65 72 28 54 | 24 29 29 20 f2 61 64 64 |.lower(T|$)) .add|
|00002c70| 66 69 6c 65 0d 0e 60 05 | cd 0d 0e 6a 0b fd 20 4c |file..`.|...j.. L|
|00002c80| 25 3d 2d 31 0d 0e 74 05 | e1 0d 0e 7e 04 0d 0e 88 |%=-1..t.|...~....|
|00002c90| 0d dd f2 61 64 64 66 69 | 6c 65 0d 0e 92 45 d5 23 |...addfi|le...E.#|
|00002ca0| 43 25 2c 52 24 2b 22 2e | 22 2b 54 24 2b 22 20 26 |C%,R$+".|"+T$+" &|
|00002cb0| 22 2b c3 7e 28 6d 69 73 | 63 25 21 38 29 2b 22 20 |"+.~(mis|c%!8)+" |
|00002cc0| 26 22 2b c3 7e 28 6d 69 | 73 63 25 21 30 29 2b 22 |&"+.~(mi|sc%!0)+"|
|00002cd0| 20 26 22 2b c3 7e 28 6d | 69 73 63 25 21 34 29 0d | &"+.~(m|isc%!4).|
|00002ce0| 0e 9c 05 e1 0d 0e a6 04 | 0d 0e b0 10 dd a4 73 74 |........|......st|
|00002cf0| 72 69 6e 67 28 50 25 29 | 0d 0e ba 2b ea 20 51 24 |ring(P%)|...+. Q$|
|00002d00| 3a 51 24 3d 22 22 3a c8 | 95 20 3f 50 25 3e 33 31 |:Q$="":.|. ?P%>31|
|00002d10| 20 51 24 2b 3d bd 28 3f | 50 25 29 3a 50 25 2b 3d | Q$+=.(?|P%):P%+=|
|00002d20| 31 3a ce 0d 0e c4 07 3d | 51 24 0d 0e ce 04 0d 0e |1:.....=|Q$......|
|00002d30| d8 0f dd f2 61 76 6f 69 | 64 28 41 24 29 0d 0e e2 |....avoi|d(A$)...|
|00002d40| 1f ea 20 49 25 2c 46 24 | 3a 46 24 3d 6d 79 5f 76 |.. I%,F$|:F$=my_v|
|00002d50| 61 72 24 2b 22 2e 41 76 | 6f 69 64 22 0d 0e ec 26 |ar$+".Av|oid"...&|
|00002d60| 49 25 3d ad 20 46 24 3a | e7 20 49 25 3d 30 20 49 |I%=. F$:|. I%=0 I|
|00002d70| 25 3d ae 20 46 24 3a 8b | 20 cf 23 49 25 3d a2 23 |%=. F$:.| .#I%=.#|
|00002d80| 49 25 0d 0e f6 10 d5 23 | 49 25 2c 41 24 3a d9 23 |I%.....#|I%,A$:.#|
|00002d90| 49 25 0d 0f 00 05 e1 0d | 0f 0a 04 0d 0f 14 11 dd |I%......|........|
|00002da0| a4 62 75 69 6c 64 5f 61 | 76 6f 69 64 0d 0f 1e 16 |.build_a|void....|
|00002db0| ea 20 49 25 2c 4c 25 2c | 51 24 2c 4e 25 3a 4c 25 |. I%,L%,|Q$,N%:L%|
|00002dc0| 3d 30 0d 0f 28 2a 51 24 | 3d 6d 79 5f 76 61 72 24 |=0..(*Q$|=my_var$|
|00002dd0| 2b 22 2e 41 76 6f 69 64 | 22 3a 49 25 3d 8e 20 51 |+".Avoid|":I%=. Q|
|00002de0| 24 3a e7 20 49 25 3d 30 | 20 3d 4c 25 0d 0f 32 0e |$:. I%=0| =L%..2.|
|00002df0| c8 95 20 ac 28 c5 23 49 | 25 29 0d 0f 3c 15 20 20 |.. .(.#I|%)..<. |
|00002e00| 51 24 3d a4 6c 6f 77 65 | 72 28 be 23 49 25 29 0d |Q$=.lowe|r(.#I%).|
|00002e10| 0f 46 31 20 20 4e 25 3d | a4 6d 61 6c 6c 6f 63 28 |.F1 N%=|.malloc(|
|00002e20| a9 28 51 24 29 2b 35 29 | 3a 24 28 4e 25 2b 34 29 |.(Q$)+5)|:$(N%+4)|
|00002e30| 3d 51 24 3a 21 4e 25 3d | 4c 25 3a 4c 25 3d 4e 25 |=Q$:!N%=|L%:L%=N%|
|00002e40| 0d 0f 50 05 ce 0d 0f 5a | 07 3d 4c 25 0d 0f 64 04 |..P....Z|.=L%..d.|
|00002e50| 0d 0f 6e 11 dd f2 73 65 | 74 70 61 73 73 28 50 24 |..n...se|tpass(P$|
|00002e60| 29 0d 0f 78 0e ea 20 43 | 24 2c 41 25 2c 43 25 0d |)..x.. C|$,A%,C%.|
|00002e70| 0f 82 2c 43 24 3d 6d 79 | 5f 76 61 72 24 2b 22 2e |..,C$=my|_var$+".|
|00002e80| 50 61 73 73 77 6f 72 64 | 22 3a 43 25 3d ae 20 43 |Password|":C%=. C|
|00002e90| 24 3a 6f 70 65 6e 32 25 | 3d 43 25 0d 0f 8c 0e d5 |$:open2%|=C%.....|
|00002ea0| 23 43 25 2c a9 28 50 24 | 29 0d 0f 96 10 43 24 3d |#C%,.(P$|)....C$=|
|00002eb0| a4 63 6f 64 65 28 50 24 | 29 0d 0f a0 26 e3 20 41 |.code(P$|)...&. A|
|00002ec0| 25 3d 31 20 b8 20 a9 28 | 50 24 29 3a d5 23 43 25 |%=1 . .(|P$):.#C%|
|00002ed0| 2c 97 28 c1 43 24 2c 41 | 25 2c 31 29 29 3a ed 0d |,.(.C$,A|%,1)):..|
|00002ee0| 0f aa 11 d9 23 43 25 3a | 6f 70 65 6e 32 25 3d 30 |....#C%:|open2%=0|
|00002ef0| 0d 0f b4 05 e1 0d 0f be | 04 0d 0f c8 1d dd a4 73 |........|.......s|
|00002f00| 68 6f 75 6c 64 5f 61 64 | 64 28 74 79 70 65 25 2c |hould_ad|d(type%,|
|00002f10| 6e 61 6d 65 24 29 0d 0f | d2 05 f4 0d 0f dc 49 f4 |name$)..|......I.|
|00002f20| 20 2a 2a 2a 20 50 6c 61 | 63 65 20 79 6f 75 72 20 | *** Pla|ce your |
|00002f30| 63 68 65 63 6b 73 20 68 | 65 72 65 2c 20 75 73 65 |checks h|ere, use|
|00002f40| 20 74 79 70 65 25 20 66 | 6f 72 20 66 69 6c 65 20 | type% f|or file |
|00002f50| 74 79 70 65 20 28 2d 31 | 20 3d 20 61 62 73 6f 6c |type (-1| = absol|
|00002f60| 75 74 65 29 0d 0f e6 22 | f4 20 2a 2a 2a 20 6e 61 |ute)..."|. *** na|
|00002f70| 6d 65 24 20 69 73 20 6c | 6f 77 65 72 20 63 61 73 |me$ is l|ower cas|
|00002f80| 65 20 6f 6e 6c 79 0d 0f | f0 05 f4 0d 0f fa 11 e7 |e only..|........|
|00002f90| 20 74 79 70 65 25 3d 2d | 31 20 3d b9 0d 10 04 13 | type%=-|1 =.....|
|00002fa0| e7 20 74 79 70 65 25 3d | 26 46 46 41 20 3d b9 0d |. type%=|&FFA =..|
|00002fb0| 10 0e 16 e7 20 6e 61 6d | 65 24 3d 22 21 62 6f 6f |.... nam|e$="!boo|
|00002fc0| 74 22 20 3d b9 0d 10 18 | 15 e7 20 6e 61 6d 65 24 |t" =....|.. name$|
|00002fd0| 3d 22 21 72 75 6e 22 20 | 3d b9 0d 10 22 06 3d a3 |="!run" |=...".=.|
|00002fe0| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
